(define-module (language python module python ) #:use-module (language python module _python) #:use-module (language python compile ) #:use-module (language python module ) #:use-module ((language python format2) #:select ())) (define-syntax re-export-all (syntax-rules () [(_ iface) (module-for-each (lambda (name . l) (module-re-export! (current-module) ((@ (guile) list) name))) (module-public-interface (resolve-module 'iface)))] [(_ iface _ li) (let ((l 'li)) (module-for-each (lambda (name . l) (if (not (member name l)) (module-re-export! (current-module) ((@ (guile) list) (pk name))))) (module-public-interface (resolve-module 'iface))))])) (set! (@ (language python module os) path) (Module '(path os module python language) '(path os))) (re-export-all (language python module _python))