zOs/REXX/WSHTTW
$#%
sy eins
* kommentar eins
do i=1 to 3 $@% sy zwei $i
* kommentar zwei
* kommentar zwei
* kommentar zwei
* kommentar zwei
sy drei
if 1 then
sy vier
sy fuenf
$proc $@/sy/
$arg msg
say 'sy:' $msg
$/sy/
$#out 20160811 10:12:08
$#out 20160811 10:05:10
$#out 20160811 10:04:43
$#out 20160811 10:04:28
$#out 20160811 09:59:18
scanErr wsh kindCall'%' expected: compile stopped before end of input
last token scanPosition if 1 then
pos 1 in line 13: if 1 then
in wsh phase compile
$#out 20160811 09:57:25
scanErr wsh kindCall'%' expected: compile stopped before end of input
last token scanPosition if 1 then
pos 1 in line 13: if 1 then
in wsh phase compile
$#out 20160811 09:54:15
fatal error in WST: undefined var if
in wsh phase run
$#out 20160811 09:53:56
$#out 20160811 09:52:42
$#out 20160811 09:52:11
$#out 20160811 09:51:35
$#out 20160811 09:51:29
$#out 20160811 09:50:19
$#out 20160811 09:50:01
scanErr primary, block or expression expected
last token scanPosition
pos 4 in line 1: $@%
in wsh phase compile
$#out