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

Initial data commit

Browse source
This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 72d218235f
commit f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
Task/Reflection-List-properties/REXX/reflection-list-properties-1.rexx Normal file
View file

@ -0,0 +1,5 @@
j=2
abc.j= -4.12
say 'variable abc.2 (length' length(abc.2)')=' abc.2

11
Task/Reflection-List-properties/REXX/reflection-list-properties-2.rexx Normal file
View file

@ -0,0 +1,11 @@
/* REXX shows the "equivalent" to PL/I's PUT DATA for a simple variable */
/* put_data2('a.') to show all a.tail values isn't that easy :-) */
j=2
abc.j= -4.12
Say put_data('abc.2') /* Put Data(abc(2)) */
string=put_data('abc.2') /* Put string(string) Data(abc(2)) */
Say string
Exit
put_data:
Parse Arg variable
return(variable'='''value(variable)'''')