题
我使用蚋(Ada95的旧编译器),我有问题打印日期。结果 我declaired:(带Ada.calendar)
CDATE:Calendar.Time;结果 CDATE:= Calendar.Time_Of(年份=> 2010,月=> 1,天=> 10);
现在我试着打印 -
PUT_LINE( “年:” &年份(CDATE)'图);
但我没有能够做到这样...
解决方案
您仅供节目片段,所以很难说什么你实际上写的,并试图运行。而你没有表明它没有“如何”不行。这是不是编译?它是否编译,但不能正常运行?
如果将这些碎片切割成-是从您的代码,并粘贴在这里,你可能已经得到了语法错误。
下面是一个完全正常的程序,做您看起来是想要的:
with Calendar;
with Text_IO; use Text_IO;
procedure Cdate_Test is
Cdate : Calendar.Time;
begin
Cdate := Calendar.Time_Of(Year => 2010, Month => 1, Day => 10);
Put_Line("Year: " & Calendar.Year(Cdate)'Img);
end Cdate_Test;
这是编译和使用蚋运行,而你也可以使用老版本的,它本身不是一个“旧的编译器”,它的最新/最伟大的免费版本,的 GNAT GPL 2009 时,是容易获得的。
不隶属于 StackOverflow