diff options
-rw-r--r-- | oop/goops.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/oop/goops.scm b/oop/goops.scm index 8445d20b1..4f997da3f 100644 --- a/oop/goops.scm +++ b/oop/goops.scm @@ -96,7 +96,7 @@ (export instance? slot-ref-using-class slot-set-using-class! slot-bound-using-class? - slot-exists-using-class? slot-ref slot-set! slot-bound? class-of + slot-exists-using-class? slot-ref slot-set! slot-bound? class-name class-direct-supers class-direct-subclasses class-direct-methods class-direct-slots class-precedence-list class-slots class-environment @@ -106,6 +106,8 @@ method-procedure accessor-method-slot-definition slot-exists? make find-method get-keyword) +(re-export class-of) ;; from (guile) + (define min-fixnum (- (expt 2 29))) |