summaryrefslogtreecommitdiff
path: root/modules/language/python/module/builtins.scm
diff options
context:
space:
mode:
Diffstat (limited to 'modules/language/python/module/builtins.scm')
-rw-r--r--modules/language/python/module/builtins.scm20
1 files changed, 20 insertions, 0 deletions
diff --git a/modules/language/python/module/builtins.scm b/modules/language/python/module/builtins.scm
new file mode 100644
index 0000000..5b54a07
--- /dev/null
+++ b/modules/language/python/module/builtins.scm
@@ -0,0 +1,20 @@
+(define-module (language python module builtins)
+ #:use-module (language python module python))
+
+(define-syntax re-export-all
+ (syntax-rules ()
+ [(_ iface)
+ (module-for-each
+ (lambda (name . l)
+ (module-re-export! (current-module) ((@ (guile) list) name)))
+ (resolve-interface 'iface))]
+ [(_ iface _ li)
+ (let ((l 'li))
+ (module-for-each
+ (lambda (name . l)
+ (if (not (member name l))
+ (module-re-export! (current-module) ((@ (guile) list) name))))
+ (resolve-interface 'iface)))]))
+
+(re-export-all (language python module python))
+