Associative array/Merging: Difference between revisions

Add Tcl version
(Ada version)
(Add Tcl version)
Line 1,431:
{{output}}
<pre>["price": 15.25, "name": "Rocket Skates", "color": "red", "year": 1974]</pre>
 
=={{header|Tcl}}==
<lang tcl>set dict1 [dict create name "Rocket Skates" price 12.75 color yellow]
set dict2 [dict create price 15.25 color red year 1974]
dict for {key val} [dict merge $dict1 $dict2] {
puts "$key: $val"
}</lang>
{{output}}
<pre>name: Rocket Skates
price: 15.25
color: red
year: 1974</pre>
 
=={{header|VBA}}==
Anonymous user