1 files changed, 15 insertions, 0 deletions
diff --git a/clojurescript/tests/t04.cljs b/clojurescript/tests/t04.cljs
new file mode 100644
index 00000000..e8e1463f
--- /dev/null
+++ b/clojurescript/tests/t04.cljs
@@ -0,0 +1,15 @@
+; This may look like Clojure, but it's actually ClojureScript.  Macros
+; may be used here, but should be defined elsewhere, in regular
+; Clojure code.
+(ns n01se)
+
+(defn script-src []
+  (for [elem (.getElementsByTagName document "script")]
+    (do
+      (prn :next)
+      (if-let [src (.src elem)]
+        src
+        "--none--"))))
+
+(doseq [src (take 2 (script-src))]
+  (prn src))