diff options
Diffstat (limited to 'hello_world_ada/hello.adb')
-rw-r--r-- | hello_world_ada/hello.adb | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/hello_world_ada/hello.adb b/hello_world_ada/hello.adb new file mode 100644 index 0000000..63f8ac0 --- /dev/null +++ b/hello_world_ada/hello.adb @@ -0,0 +1,20 @@ +-- +-- Hello World with Flair +-- + +with Text_IO; use Text_IO; + +procedure Hello is +begin + Put_Line ("GNAT/RTEMS Hello World Test"); + New_Line; + Put_Line ("Welcome to the World of Lady Ada"); + + New_Line; + Put_Line ("Initiating 2.5 second delay"); + delay 2.5; + Put_Line ("Delay Complete"); + + Put_Line ("Test Complete"); +end Hello; + |