From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-0.5 required=5.0 tests=BAYES_00,FREEMAIL_FROM,
	INVALID_MSGID,PP_MIME_FAKE_ASCII_TEXT autolearn=no autolearn_force=no
	version=3.4.4
X-Google-Language: ENGLISH,ASCII
X-Google-Thread: 103376,b1558fe570ef93b8,start
X-Google-Attributes: gid103376,public
From: "Bryan Stacey Couch" <staceycouch@yahoo.com>
Subject: Problems with ADA libraries
Date: 1998/11/05
Message-ID: <3642143b.0@news1.mcmail.com>#1/1
X-Deja-AN: 408788878
X-Trace: 5 Nov 1998 21:10:19 GMT, 195.44.193.171
Newsgroups: comp.lang.ada
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Date: 1998-11-05T00:00:00+00:00
List-Id: <comp.lang.ada>

Hi!

I am a student studying for my degree in the UK I am having problems with
GNATS compiler for Windows 98.  I am trying to use the CALENDER packager but
keep being told that it can't be found.  The file is in the library
directory and I tried putting it in the same directory as the source file
but to no avail.

The code is as follows, it is going to be used as a timing package for an
automated machine line.  This basic code doesn't do much I just wanted to
check out how it worked.

Any help would be much appreciated and I don�t want someone to WRITE THE
CODE for me, just help with the compilation would be great.

Thanks

Stacey Couch
Staceycouch@mcmail.com

with Calender; use Calender;
procedure Time1 is
   package Time_Io is new Fixed_Io(Day_Duration);
   use Time_Io;
   T:Day_Duration;
   X:Float;
begin
   T:=Secound(Clock);
   Time_Io.Put(T);
   New_Line;
   for Z in 1..1000 loop
      X:=5.23234;
   end loop;
   T:=Secounds(Clock);
   Time_Io.Put(T);
   New_Line;
end Time1;