Data update

This commit is contained in:
Ingy döt Net 2025-06-11 20:16:52 -04:00
parent 72eb4943cb
commit 4d5544505c
2347 changed files with 62432 additions and 16731 deletions

View file

@ -1,6 +1,6 @@
base$[][] = [ [ "name" "Rocket Skates" ] [ "price" 12.75 ] [ "color" "yellow" ] ]
update$[][] = [ [ "price" 15.25 ] [ "color" "red" ] [ "year" 1974 ] ]
proc update . a$[][] b$[][] .
proc update &a$[][] &b$[][] .
for b to len b$[][]
for a to len a$[][]
if a$[a][1] = b$[b][1]
@ -8,9 +8,7 @@ proc update . a$[][] b$[][] .
break 1
.
.
if a > len a$[][]
a$[][] &= b$[b][]
.
if a > len a$[][] : a$[][] &= b$[b][]
.
.
update base$[][] update$[][]