rexx-things/projects/oorexx/tso-emu.rex

11 lines
161 B
Rexx
Raw Normal View History

2025-03-17 23:22:49 +00:00
#!/usr/bin/env rexx
address hostemu 'execio * diskr "jabberwocky.txt" (finis stem jby.'
Do x = 1 to jby.0
Say jby.x
End
Exit
::requires "hostemu" LIBRARY