summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--oop/goops.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/oop/goops.scm b/oop/goops.scm
index 360712122..70d47b4f8 100644
--- a/oop/goops.scm
+++ b/oop/goops.scm
@@ -741,6 +741,9 @@
(define-method (equal? x y) #f)
+;;; These following two methods are for backward compatibility only.
+;;; They are not called by the Guile interpreter.
+;;;
(define-method (object-eqv? x y) #f)
(define-method (object-equal? x y) (eqv? x y))