Jump to content

Execute HQ9+: Difference between revisions

m
→‎{{header|REXX}}: added a comment about the salutatory text. -- ~~~~
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
Cookies help us deliver our services. By using our services, you agree to our use of cookies.