add: for sample, fix bugs, and make test harness
This commit is contained in:
8
samples/hello.rpg
Normal file
8
samples/hello.rpg
Normal file
@@ -0,0 +1,8 @@
|
||||
CTL-OPT DFTACTGRP(*NO);
|
||||
|
||||
DCL-S greeting CHAR(25) INZ('Hello, World!');
|
||||
|
||||
DCL-PROC main EXPORT;
|
||||
DSPLY greeting;
|
||||
RETURN;
|
||||
END-PROC;
|
||||
Reference in New Issue
Block a user