source: ada-examples/hello_world_ada/hello.adb @ e3df5e2

ada-examples-4-10-branch
Last change on this file since e3df5e2 was e3df5e2, checked in by Joel Sherrill <joel.sherrill@…>, on Sep 17, 2009 at 5:36:53 PM

2009-09-17 Joel Sherrill <joel.sherrill@…>

  • hello.adb: Make follow standard RTEMS test output format.
  • hello_world_ada.scn: New file.
  • pc386-elf2boot: Removed.
  • Property mode set to 100644
File size: 381 bytes
Line 
1--
2--  Hello World with Flair
3--
4
5with Text_IO; use Text_IO;
6
7procedure Hello is
8begin
9   Put_Line ("*** GNAT/RTEMS Hello World Test ***");
10   New_Line;
11   Put_Line ("Welcome to the World of Lady Ada");
12
13   New_Line;
14   Put_Line ("Initiating 2.5 second delay");
15   delay 2.5;
16   Put_Line ("Delay Complete");
17
18   Put_Line ("*** END OF GNAT/RTEMS Hello World Test ***");
19end Hello;
20
Note: See TracBrowser for help on using the repository browser.