Skip to content

Commit c13383c

Browse files
committed
more tweaks / fixes
1 parent df2b5fd commit c13383c

File tree

1 file changed

+3
-14
lines changed

1 file changed

+3
-14
lines changed

src/main/clojure/cljs/compiler.cljc

Lines changed: 3 additions & 14 deletions
Original file line numberDiff line numberDiff line change
@@ -476,7 +476,7 @@
476476
(emitln "throw " throw ";")))
477477

478478
(def base-types
479-
#{"null" "*"
479+
#{"null" "*" "...*"
480480
"boolean" "Boolean"
481481
"string" "String"
482482
"number" "Number"
@@ -509,26 +509,15 @@
509509
t (if optional?
510510
(subs t 0 (dec (count t)))
511511
t)
512-
ret (str (:name (ana/resolve-var env (symbol t))))]
512+
ret (munge (str (:name (ana/resolve-var env (symbol t)))))]
513513
(if optional?
514514
(str ret "=")
515515
ret))))
516516

517-
(defn type-munge [s]
518-
(cond
519-
(= "null" s) s
520-
(= "*" s) s
521-
:else (munge s)))
522-
523517
(defn resolve-types [env ts]
524518
(let [ts (-> ts string/trim (subs 1 (dec (count ts))))
525519
xs (string/split ts #"\|")]
526-
(str
527-
"{"
528-
(->> (map #(resolve-type env %) xs)
529-
(map type-munge)
530-
(string/join "|"))
531-
"}")))
520+
(str "{" (string/join "|" (map #(resolve-type env %) xs)) "}")))
532521

533522
(defn munge-param-return [env line]
534523
(cond

0 commit comments

Comments
 (0)