1

Gnat (ada95 の古いコンパイラ) を使用していますが、日付の出力に問題があります。
I declaired : (with Ada.calendar)

Cdate: Calendar.Time;
Cdate:= Calendar.Time_Of(Year => 2010,Month => 1,Day => 10);

今、私はそれを印刷しようとしました -

Put_Line("Year : " & Year(Cdate)'Img);

しかし、私はそうすることができませんでした...

4

1 に答える 1

2

プログラムの断片しか提供していないため、実際に何を書き、何を実行しようとしているのかを判断するのは困難です。そして、あなたはそれがうまくいかなかった「方法」を示しませんでした。コンパイルされませんでしたか？コンパイルできたのに正しく実行されませんでしたか?

コードからフラグメントをそのまま切り取ってここに貼り付けた場合、構文エラーが発生した可能性があります。

これは、あなたが望むように見える完全に機能するプログラムです。

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 を使用してコンパイルおよび実行されたものであり、古いバージョンを使用している可能性がありますが、それ自体は「古いコンパイラ」ではなく、最新/最高の無料バージョンであるGNAT GPL 2009がすぐに入手できます。

于 2010-01-11T14:30:55.940 に答える