We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 072d87d commit 9dc6846Copy full SHA for 9dc6846
1 file changed
src/main/clojure/cljs/core.cljc
@@ -726,6 +726,12 @@
726
:cljs (new js/Error (core/str "Unsupported binding key: " (ffirst kwbs)))))
727
(reduce process-entry [] bents)))))
728
729
+(core/defmacro ^:private return-first
730
+ [& body]
731
+ `(let [ret# ~(first body)]
732
+ ~@(rest body)
733
+ ret#))
734
+
735
(core/defmacro goog-define
736
"Defines a var using `goog.define`. Passed default value must be
737
string, number or boolean.
@@ -751,7 +757,7 @@
751
757
(core/string? default) "string"
752
758
(core/number? default) "number"
753
759
(core/or (core/true? default) (core/false? default)) "boolean")]
754
- `(do
760
+ `(~(if (:def-emits-var &env) `return-first `do)
755
761
(declare ~(core/vary-meta sym
756
762
(core/fn [m]
763
(core/cond-> m
0 commit comments