--- /dev/null
+(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))
+
(define-method (write (o <py-int>) . l)
(apply write (slot-ref o 'x) l))
-(define-python-class int (<py-int>)
+(define-python-class int (<py> <py-int>)
(define __init__
(letrec ((__init__
(case-lambda
ret
#f)))))
-(define-python-class float (<py-float>)
+(define-python-class float (<py> <py-float>)
(define __init__
(case-lambda
((self n)
(name-object float)
-(define-python-class py-complex (<py-complex>)
+(define-python-class py-complex (<py> <py-complex>)
(define __init__
(case-lambda
((self n)