diff --git a/src/babashka/utils.clj b/src/babashka/utils.clj index dd748138..3ca6bc54 100644 --- a/src/babashka/utils.clj +++ b/src/babashka/utils.clj @@ -1,9 +1,11 @@ (ns babashka.utils) -(defmacro when-graal [& body] - (when (resolve 'babashka.impl.Graal) - `(do ~@body))) +(defmacro if-graal [then else] + (if (resolve 'babashka.impl.Graal) + ~then + ~else)) (defn set-env [name value] - (when-graal - (babashka.impl.Graal/setEnv name value))) + (if-graal + (babashka.impl.Graal/setEnv name value) + (throw (UnsupportedOperationException. "set-env is only available in the native image."))))