summaryrefslogtreecommitdiff
path: root/module/oop
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2017-09-22 16:19:38 +0200
committerAndy Wingo <wingo@pobox.com>2017-09-22 16:19:38 +0200
commit28d5e81c133904148c191e7b2368e3c4d7cad567 (patch)
tree2c4aa4bd867ccd1db6526504910444464ccec15e /module/oop
parentb036422d154f7517a4a00aa2c4e852318220166d (diff)
downloadguile-28d5e81c133904148c191e7b2368e3c4d7cad567.tar.gz
Remove <int-slot>, <float-slot>, <double-slot>
* module/oop/goops.scm (<int-slot>, <float-slot>, <double-slot>): Remove slot classes that never did anything.
Diffstat (limited to 'module/oop')
-rw-r--r--module/oop/goops.scm5
1 files changed, 1 insertions, 4 deletions
diff --git a/module/oop/goops.scm b/module/oop/goops.scm
index c883320f9..bbf7ff604 100644
--- a/module/oop/goops.scm
+++ b/module/oop/goops.scm
@@ -44,7 +44,7 @@
<foreign-slot> <protected-slot> <hidden-slot> <opaque-slot>
<read-only-slot> <protected-opaque-slot>
<protected-hidden-slot> <protected-read-only-slot>
- <scm-slot> <int-slot> <float-slot> <double-slot>
+ <scm-slot>
;; Redefinable classes.
<redefinable-class>
@@ -890,9 +890,6 @@ slots as we go."
(define-standard-class <protected-read-only-slot> (<protected-slot>
<read-only-slot>))
(define-standard-class <scm-slot> (<protected-slot>))
-(define-standard-class <int-slot> (<foreign-slot>))
-(define-standard-class <float-slot> (<foreign-slot>))
-(define-standard-class <double-slot> (<foreign-slot>))