comp.lang.ada
 help / color / mirror / Atom feed
From: tmoran@bix.com
Subject: Re: DOS GNAT questions
Date: 1996/06/03
Date: 1996-06-03T00:00:00+00:00	[thread overview]
Message-ID: <4otg2q$74t@news1.delphi.com> (raw)


Replacing ClearScreen and MoveCursor in ...\examples\screen.adb with:

  procedure ScreenClear;
  pragma Import(C, ScreenClear, external_name=>"ScreenClear");

  procedure ClearScreen renames ScreenClear;

  procedure ScreenSetCursor(row,col:in natural);
  pragma Import(C, ScreenSetCursor, external_name=>"ScreenSetCursor");

  procedure MoveCursor (To: in Position) is
  begin
    ScreenSetCursor(To.Row, To.Column);
  end MoveCursor;

makes the philosophers dine pleasantly on my non-ANSI screen
(though they don't clear the table when done).
Apparently it was the lack of "external_name=>..."s, rather
than a need to explicitly name a C library, that was giving
me troubles.  It appears I'll have to download more than the
minimum djgpp stuff to find answers to my other questions.




             reply	other threads:[~1996-06-03  0:00 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1996-06-03  0:00 tmoran [this message]
  -- strict thread matches above, loose matches on Subject: below --
1996-06-02  0:00 DOS GNAT questions tmoran
1996-06-02  0:00 ` Michael Feldman
1996-06-02  0:00 ` Michael Feldman
1996-06-02  0:00 ` Michael Feldman
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox