Anonymous user
DELAY.REX: Difference between revisions
m
→{{header|REXX}}: simplified the code.
m (→{{header|REXX}}: updated code to use a return code of 1 if HALTed.) |
m (→{{header|REXX}}: simplified the code.) |
||
Line 19:
=={{header|REXX}}==
<lang rexx> select▼
▲ select
when !cms then @cpsleep n "SEC" /*Is this CMS? Use CP SLEEP. */
when !tso then call sleep n /*Is this TSO? Use SLEEP cmd. */
Line 73 ⟶ 36:
halt: return 1 /*return a zero value (if a function).*/
/*══════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════*/
|