luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

wip

Browse source
This commit is contained in:
Michiel Borkent 2021-05-20 23:22:31 +02:00
parent 63c37c838d
commit d2c1d93240
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src-java/babashka/impl/Graal.java
View file

@ -27,10 +27,13 @@ public class Graal {
// API // API
public static void setEnv(String name, String value) { public static void setEnv(String name, String value) {
System.out.println("setenv", name, value);
try (CCharPointerHolder nameHolder = CTypeConversion.toCString(name); try (CCharPointerHolder nameHolder = CTypeConversion.toCString(name);
CCharPointerHolder valueHolder = CTypeConversion.toCString(value)) { CCharPointerHolder valueHolder = CTypeConversion.toCString(value)) {
setenv(nameHolder.get(), valueHolder.get(), 1); setenv(nameHolder.get(), valueHolder.get(), 1);
System.out.println(System.getenv(name));
} }
System.out.println(System.getenv(name));
} }
// public static void main(String[] args) { // public static void main(String[] args) {

4
src/babashka/utils.clj
View file

@ -7,5 +7,7 @@
(defn set-env [name value] (defn set-env [name value]
(if-graal (if-graal
(babashka.impl.Graal/setEnv name value) (do
(prn :setting name value)
(babashka.impl.Graal/setEnv name value))
(throw (UnsupportedOperationException. "set-env is only available in the native image.")))) (throw (UnsupportedOperationException. "set-env is only available in the native image."))))