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

hmm [skip ci]

Browse source
This commit is contained in:
Michiel Borkent 2022-12-26 13:35:13 +01:00
parent 4bb2a75a0b
commit f8672d83f2
2 changed files with 10 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
project.clj
View file

@ -97,9 +97,9 @@
{:dependencies [[com.clojure-goes-fast/clj-async-profiler "0.5.0"]
[com.opentable.components/otj-pg-embedded "0.13.3"]
[nubank/matcher-combinators "3.6.0"]]}]
:uberjar {:global-vars {*assert* false}
:jvm-opts ["-Dclojure.compiler.direct-linking=true"
"-Dclojure.spec.skip-macros=true"
:uberjar {;; :global-vars {*assert* false}
:jvm-opts [#_"-Dclojure.compiler.direct-linking=true"
#_"-Dclojure.spec.skip-macros=true"
"-Dborkdude.dynaload.aot=true"]
:main babashka.main
:aot [babashka.main]}

7
src/babashka/main.clj
View file

@ -1138,6 +1138,13 @@ Use bb run --help to show this help output.
(let [exit-code (run args)]
(System/exit exit-code))))
;; disable graalvm bloat
(alter-var-root #'require (constantly (fn [& args] (prn :req args))))
(alter-var-root #'resolve (constantly (fn [& args] (prn :resolve args))))
(alter-var-root #'requiring-resolve (constantly (fn [& args] (prn :req-resolve args))))
(alter-var-root #'find-var (constantly (fn [& args] (prn :find-var args))))
(alter-var-root #'find-ns (constantly (fn [& args] (prn :find-ns args))))
;;;; Scratch
(comment)