aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

2016 Update

Browse source
This commit is contained in:
Tina Müller 2016-12-05 22:15:40 +01:00
parent 948b86eafa
commit dcf5d15da3
7965 changed files with 139854 additions and 31002 deletions
Download patch file Download diff file Expand all files Collapse all files

18
Task/Inverted-syntax/REXX/inverted-syntax.rexx
View file

@ -1,14 +1,10 @@
SIGNAL {ON|OFF} someCondition {name}
/*here is an example of a special case (for SYNTAX). */
/*REXX program demonstrates a use of a special case of inverted syntax (via SIGNAL ON).*/
signal on syntax
a=7
zz=444/(7-a)
zz=444 / (7-a)
return zz
syntax: say '***error***!'
say 'program is attempting to do division by zero.'
say 'REXX statement number is:' sigL
say 'the Rexx source statement is:'
say sourceLine(sigL)
exit 13
/*──────────────────────────────────────────────────────────────────────────────────────*/
syntax: say '***error*** program is attempting to do division by zero,'
say 'the REXX statement number is: ' sigL " and the REXX source is:"
say sourceLine(sigL)
exit 13