Merge pull request #33 from arturo-lang/make-put-work-with-strings

Make `put` work with strings

README.md

@@ -11,7 +11,7 @@
 <p align="center"><img width="90%" align="center" src="https://raw.githubusercontent.com/arturo-lang/grafito/master/ui-screenshot.png"/></p>
 
 --- 
-
+ 
 <!--ts-->
 
 * [At A Glance](#at-a-glance)

grafito.art

@@ -480,7 +480,7 @@ graph: function [
 
     put: function [
         name :literal :string
-        attributes :block :dictionary
+        attributes :string :block :dictionary
     ][
         ;; description: « insert new node(s) to graph with given name and attributes
         ;; options: [
@@ -503,7 +503,11 @@ graph: function [
             loop attributes 'nd [
                 lastId: lastId + 1
                 att: nd
-                if not? dictionary? att -> att: # att
+                (block? att)? -> att: # att [
+                    (string? att)? -> att: #[
+                        name: att
+                    ] []
+                ]
                 'queries ++ createNodeSQL
                 'vals ++ @[name, write.compact.json ø att]
                 'result ++ #[
@@ -518,7 +522,11 @@ graph: function [
                  printDebug ~{created |size attributes| nodes}
         ] [
             att: attributes
-            if not? dictionary? att -> att: # att
+            (block? att)? -> att: # att [
+                (string? att)? -> att: #[
+                    name: att
+                ] []
+            ]
             nodeId: performQuery.id 'put createNodeSQL @[name, write.compact.json ø att]
             result: #[
                 id: nodeId