[Guile-commits] 02/08: Remove <int-slot>, <float-slot>, <double-slot>

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit 28d5e81c133904148c191e7b2368e3c4d7cad567
Author: Andy Wingo <address@hidden>
Date:   Fri Sep 22 16:19:38 2017 +0200

    Remove <int-slot>, <float-slot>, <double-slot>
    
    * module/oop/goops.scm (<int-slot>, <float-slot>, <double-slot>): Remove
      slot classes that never did anything.
---
 module/oop/goops.scm | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/module/oop/goops.scm b/module/oop/goops.scm
index c883320..bbf7ff6 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>))