RosettaCodeData/Task/Associative-array-Merging/PureBasic/associative-array-merging.basic

22 lines
282 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
NewMap m1.s()
NewMap m2.s()
NewMap m3.s()
m1("name")="Rocket Skates"
m1("price")="12.75"
m1("color")="yellow"
m2("price")="15.25"
m2("color")="red"
m2("year")="1974"
CopyMap(m1(),m3())
ForEach m2()
m3(MapKey(m2()))=m2()
Next
ForEach m3()
Debug MapKey(m3())+" : "+m3()
Next