Anonymous user
Execute HQ9+: Difference between revisions
m
→{{header|REXX}}: added a comment about the salutatory text. -- ~~~~
m (→{{header|C}}) |
m (→{{header|REXX}}: added a comment about the salutatory text. -- ~~~~) |
||
Line 772:
do instructions=1 for length(pgm); ?=substr(pgm,instructions,1)
select
when ?=='H' then say "hello, world" /*this salutation varies. */
when ?=='Q' then do j=1 for sourceline(); say sourceline(j); end
when ?== 9 then call 99
|