summaryrefslogtreecommitdiff
path: root/modules/oop/pf-objects.scm
diff options
context:
space:
mode:
Diffstat (limited to 'modules/oop/pf-objects.scm')
-rw-r--r--modules/oop/pf-objects.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/modules/oop/pf-objects.scm b/modules/oop/pf-objects.scm
index d0ba6e4..0418a5f 100644
--- a/modules/oop/pf-objects.scm
+++ b/modules/oop/pf-objects.scm
@@ -16,7 +16,7 @@
py-super-mac py-super py-equal?
*class* *self* pyobject? pytype?
type object pylist-set! pylist-ref tr
- resolve-method rawref rawset
+ resolve-method-g rawref rawset
))
#|
@@ -75,7 +75,7 @@ explicitly tell it to not update etc.
(((p . ps) . (pp . pps))
(if (eq? pp '_)
(mmatch ps pps)
- (if (is-a? p pp)
+ (if (or (eq? p pp) (is-a? p pp))
(cons p (mmatch ps pps))
#f)))
((() . ())