From 7cceeb65c3a9fdd144b2b550fe8463ceca3c48b6 Mon Sep 17 00:00:00 2001 From: NIshanth Vydana Date: Thu, 27 Oct 2016 12:13:53 -0700 Subject: [PATCH] Create hello_world.pl1 --- p/hello_world.pl1 | 10 ++++++++++ 1 file changed, 10 insertions(+) create mode 100644 p/hello_world.pl1 diff --git a/p/hello_world.pl1 b/p/hello_world.pl1 new file mode 100644 index 00000000..b8cfd575 --- /dev/null +++ b/p/hello_world.pl1 @@ -0,0 +1,10 @@ +HELLO: PROCEDURE OPTIONS (MAIN); + + /* A PROGRAM TO OUTPUT HELLO WORLD */ + FLAG = 0; + +LOOP: DO WHILE (FLAG = 0); + PUT SKIP DATA('HELLO WORLD!'); + END LOOP; + +END HELLO;