Data update
This commit is contained in:
parent
5150844a7d
commit
4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
|
|
@ -1,5 +1,17 @@
|
|||
print_all: procedure /* [↓] is the # of args passed.*/
|
||||
do j=1 for arg()
|
||||
say arg(j)
|
||||
end /*j*/
|
||||
-- 11 Sep 2025
|
||||
include Setting
|
||||
|
||||
say 'VARIADIC FUNCTION'
|
||||
say version
|
||||
say
|
||||
call Task 'Sin(x)',,0,Abs(-12),SqRt(12)/1,,'Number 7',,2**10
|
||||
exit
|
||||
|
||||
Task:
|
||||
procedure
|
||||
do a = 1 to Arg()
|
||||
say 'Arg('a')' '=' Arg(a)
|
||||
end
|
||||
return
|
||||
|
||||
include Math
|
||||
|
|
|
|||
|
|
@ -1,5 +1,13 @@
|
|||
print_all: procedure /* [↓] is the # of args passed.*/
|
||||
do j=1 for arg()
|
||||
say '[argument' j"]: " arg(j)
|
||||
end /*j*/
|
||||
/* REXX */
|
||||
list=''
|
||||
Do i=1 To 6
|
||||
list=list||'"arg"'i','
|
||||
End
|
||||
list=list||'"end"'
|
||||
Interpret 'call show' list
|
||||
Exit
|
||||
show: procedure
|
||||
do j=1 for arg()
|
||||
say arg(j)
|
||||
end /*j*/
|
||||
return
|
||||
|
|
|
|||
|
|
@ -1,10 +0,0 @@
|
|||
call print_all .1,5,2,4,-3, 4.7e1, 013.000 ,, 8**2 -3, sign(-66), abs(-71.00), 8 || 9, 'seven numbers are prime, 8th is null'
|
||||
|
||||
call print_all "One ringy-dingy,",
|
||||
"two ringy-dingy,",
|
||||
"three ringy-dingy...",
|
||||
"Hello? This is Ma Bell.",
|
||||
"Have you been misusing your instrument?",
|
||||
"(Lily Tomlin routine)"
|
||||
|
||||
/* [↑] example showing multi-line arguments.*/
|
||||
|
|
@ -1,13 +0,0 @@
|
|||
/* REXX */
|
||||
list=''
|
||||
Do i=1 To 6
|
||||
list=list||'"arg"'i','
|
||||
End
|
||||
list=list||'"end"'
|
||||
Interpret 'call show' list
|
||||
Exit
|
||||
show: procedure
|
||||
do j=1 for arg()
|
||||
say arg(j)
|
||||
end /*j*/
|
||||
return
|
||||
Loading…
Add table
Add a link
Reference in a new issue