Fix pattern printing

This commit is contained in:
Scott Richmond 2023-12-11 16:01:49 -05:00
parent c683b73201
commit 576b280a0c

View File

@ -79,7 +79,15 @@
: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
(let [word (-> pattern :data first :data first)