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

[#538] make uberscript more accepting

Browse source
This commit is contained in:
Michiel Borkent 2020-08-17 22:09:44 +02:00
parent 418f00eb64
commit 4dd102ca19
2 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
sci

@ -1 +1 @@
Subproject commit c363caf975e6e98fadfb1adf9582d7f1ef6017fb Subproject commit 4f40b916faa394c37447c99da2e9f2605dc62d87

4
test-resources/babashka/uberscript/src/my/main.clj
View file

@ -1,10 +1,10 @@
(ns my.main (ns my.main
(:require [my.impl :as impl] ;; my.impl is already loaded, so it will not be loaded again (normally) (:require [my.impl :as impl] ;; my.impl is already loaded, so it will not be loaded again (normally)
[my.impl2] ;; but my.impl2 also loads my.impl [my.impl2] ;; but my.impl2 also loads my.impl
[my.impl3 :as impl3])) [my.impl3 :refer [foo]]))
(defn -main [& args] (defn -main [& args]
;; this function is defined non-top-level and may cause problems ;; this function is defined non-top-level and may cause problems
(impl3/foo) (foo)
;; this should just return args ;; this should just return args
(impl/impl-fn args)) (impl/impl-fn args))