Survey_text_io_test (Cave Survey Code in Ada):


--  © Copyright 1999 by John Halleck
--  All rights reserved.

--  Diddly test routine.

with Text_IO;        use Text_IO;
with Survey.Text_IO; use Survey.Text_IO;

procedure Survey_Text_Io_Test is
begin
   Put ("Test routine for the survey Text IO routines.");
   New_Line;
end Survey_Text_Io_Test;

Go to ...


This page is http://www.cc.utah.edu/~nahaj/cave/survey/code/ada/survey_text_io_test.adb.html
© Copyright 2000 by John Halleck, All Rights Reserved.
This snapshot was last modified on February 1st, 2001
And the underlying file was last modified on November 11th, 1999