Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
|
|
@ -0,0 +1,10 @@
|
|||
/* Rexx */
|
||||
|
||||
key0 = '0'
|
||||
key1 = 'key0'
|
||||
|
||||
stem. = '.' /* Initialize the associative array 'stem' to '.' */
|
||||
stem.key1 = 'value0' /* Set a specific key/value pair */
|
||||
|
||||
Say 'stem.key0= 'stem.key /* Display a value for a key that wasn't set */
|
||||
Say 'stem.key1= 'stem.key1 /* Display a value for a key that was set */
|
||||
|
|
@ -0,0 +1,27 @@
|
|||
/*REXX program shows how to set/display values for an associative array.*/
|
||||
/*┌────────────────────────────────────────────────────────────────────┐
|
||||
│ The (below) two REXX statements aren't really necessary, but it │
|
||||
│ shows how to define any and all entries in a associative array so │
|
||||
│ that if a "key" is used that isn't defined, it can be displayed to │
|
||||
│ indicate such, or its value can be checked to determine if a │
|
||||
│ particular associative array element has been set (defined). │
|
||||
└────────────────────────────────────────────────────────────────────┘*/
|
||||
stateC.=' [not defined yet] ' /*sets any/all state capitols. */
|
||||
stateN.=' [not defined yet] ' /*sets any/all state names. */
|
||||
/*┌────────────────────────────────────────────────────────────────────┐
|
||||
│ In REXX, when a "key" is used, it's normally stored (internally) │
|
||||
│ as uppercase characters (as in the examples below). Actually, any │
|
||||
│ characters can be used, including blank(s) and non-displayable │
|
||||
│ characters (including '00'x, 'ff'x, commas, periods, quotes, ...).│
|
||||
└────────────────────────────────────────────────────────────────────┘*/
|
||||
stateC.ca='Sacramento'; stateN.ca='California'
|
||||
stateC.nd='Bismarck' ; stateN.nd='North Dakota'
|
||||
stateC.mn='St. Paul' ; stateN.mn='Minnesota'
|
||||
stateC.dc='Washington'; stateN.dc='District of Columbia'
|
||||
stateC.ri='Providence'; stateN.ri='Rhode Island and Providence Plantations'
|
||||
|
||||
say 'capital of California is' stateC.ca
|
||||
say 'capital of Oklahoma is' stateC.ok
|
||||
yyy='RI'
|
||||
say 'capital of' stateN.yyy "is" stateC.yyy
|
||||
/*stick a fork in it, we're done.*/
|
||||
Loading…
Add table
Add a link
Reference in a new issue