folkert/Learning
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add new attributes

Browse Source
This commit is contained in:
Folkert Kevelam 2025-03-28 21:55:16 +01:00
parent 5186a84010
commit 8819987c5f
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
SICP/dot.janet
View File

@ -1,11 +1,12 @@
(def attr-map @{ (def attr-map @{
:rankdir ["rankdir" false] :rankdir ["rankdir" false]
:newrank ["newrank" false] :newrank ["newrank" false]
:rank ["rank" false]
:label ["label" true] :label ["label" true]
:shape ["shape" false] :shape ["shape" false]
:group ["group" true] :group ["group" true]
:fillcolor ["fillcolor" false] :fillcolor ["fillcolor" false]
:style ["filled" true] }) :style ["style" true] })
(defn attr-to-string [attr attr-value] (defn attr-to-string [attr attr-value]
(def name (get attr 0)) (def name (get attr 0))