Data commit

Task/Associative-array-Creation/Sather/associative-array-creation.sa

@@ -0,0 +1,20 @@
+class MAIN is
+  main is
+    -- creation of a map between strings and integers
+    map ::= #MAP{STR, INT};
+
+    -- add some values
+    map := map.insert("red", 0xff0000);
+    map := map.insert("green", 0xff00);
+    map := map.insert("blue", 0xff);
+
+    #OUT + map + "\n"; -- show the map...
+
+    -- test if "indexes" exist
+    #OUT +  map.has_ind("red") + "\n";
+    #OUT +  map.has_ind("carpet") + "\n";
+
+    -- retrieve a value by index
+    #OUT + map["green"] + "\n";
+  end;
+end;