Runtime evaluation/In an environment: Difference between revisions

m
→‎{{header|REXX}}: made REXX program compliant, changed a subroutine name from x ---> fact. -- ~~~~
(→‎{{header|ooRexx}}: Add example for ooRexx)
m (→‎{{header|REXX}}: made REXX program compliant, changed a subroutine name from x ---> fact. -- ~~~~)
Line 529:
 
=={{header|REXX}}==
<lang rexx>/*REXX program to demonstrate some run-time evaulations. */
<lang rexx>
a=xfact(3)
b=xfact(4)
say b-a
exit
 
xfact: procedure; arg n; !=1; do j=2 to n; !=!*j; end; return !</lang>
 
'''output'''
x: procedure;arg n;!=1;do j=2 to n;!=!*j;end;return !
</lang>
Output:
<pre>
18