summaryrefslogtreecommitdiff
path: root/tests/core.fnl
diff options
context:
space:
mode:
Diffstat (limited to 'tests/core.fnl')
-rw-r--r--tests/core.fnl3
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/core.fnl b/tests/core.fnl
index 5dc4953..edd72f4 100644
--- a/tests/core.fnl
+++ b/tests/core.fnl
@@ -5,7 +5,8 @@
"Require module and bind all it's functions to locals."
`(local ,(let [destr-map# {}]
(each [k# _# (pairs (require module))]
- (tset destr-map# k# (sym k#)))
+ (when (not= (string.sub k# 1 1) :_)
+ (tset destr-map# k# (sym k#))))
destr-map#)
(require ,module)))