Return to ts_byemess.adb CVS log

Up to [local] / OpenXM_contrib / PHC / Ada / System

Annotation of OpenXM_contrib/PHC/Ada/System/ts_byemess.adb, Revision 1.1

1.1     ! maekawa     1: with text_io;                            use text_io;
        !             2: with Bye_Bye_Message;
        !             3:
        !             4: procedure ts_byemess is
        !             5:
        !             6: -- DESCRIPTION :
        !             7: --   Prints the message to say bye bye at the end of the program.
        !             8:
        !             9: begin
        !            10:   put_line(Bye_Bye_Message);
        !            11: end ts_byemess;