diff options
Diffstat (limited to '')
| -rw-r--r-- | lux-bootstrapper/src/lux/type.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lux-bootstrapper/src/lux/type.clj b/lux-bootstrapper/src/lux/type.clj index 9935d9cfa..e1e229ce9 100644 --- a/lux-bootstrapper/src/lux/type.clj +++ b/lux-bootstrapper/src/lux/type.clj @@ -377,10 +377,10 @@ (&/$Primitive name params) (|case params (&/$End) - (str "(primitive " (pr-str name) ")") + (str "(Primitive " (pr-str name) ")") _ - (str "(primitive " (pr-str name) " " (->> params (&/|map show-type) (&/|interpose " ") (&/fold str "")) ")")) + (str "(Primitive " (pr-str name) " " (->> params (&/|map show-type) (&/|interpose " ") (&/fold str "")) ")")) (&/$Product _) (str "[" (->> (flatten-prod type) (&/|map show-type) (&/|interpose " ") (&/fold str "")) "]") |