twc/ludus
4
0
Fork 0
Code Issues 32 Pull Requests Packages Projects 8 Releases Wiki Activity

Fix pattern printing

Browse Source
This commit is contained in:
Scott Richmond 2023-12-11 16:01:49 -05:00
parent c683b73201
commit 576b280a0c
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/ludus/show.cljc
View File

@ -79,7 +79,15 @@
:else "else" :else "else"
(:word :number :keyword :true :false :nil :string) (-> pattern :data first show) :true "true"
:false "false"
:nil "nil"
:string (-> pattern :data first show)
(:word :number :keyword) (-> pattern :data first str)
:typed :typed
(let [word (-> pattern :data first :data first) (let [word (-> pattern :data first :data first)