diff options
author | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-05-14 18:00:15 +0200 |
---|---|---|
committer | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-05-14 18:00:15 +0200 |
commit | ba256d9aaabbe71a8c526585e22d455a9d2066fd (patch) | |
tree | 56ab56b23140dc134228847182a92cfedee81178 /modules/language/python/number.scm | |
parent | 0a2045050517a2317083bd2ec17bae09e03c4a11 (diff) | |
parent | 330ef2953f31dd7a5b64ff72919c4d7d696c7a83 (diff) |
Merge branch 'master' of https://gitlab.com/python-on-guile/python-on-guile
Diffstat (limited to 'modules/language/python/number.scm')
-rw-r--r-- | modules/language/python/number.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/modules/language/python/number.scm b/modules/language/python/number.scm index 845a155..db8a0c8 100644 --- a/modules/language/python/number.scm +++ b/modules/language/python/number.scm @@ -65,11 +65,11 @@ (define-method (op (o1 <py-complex>) o2) (op (slot-ref o1 'x) o2)) (define-method (op o2 (o1 <py-int>)) - (op (slot-ref o1 'x) o2)) + (op o2 (slot-ref o1 'x))) (define-method (op o2 (o1 <py-complex>)) - (op (slot-ref o1 'x) o2)) + (op o2 (slot-ref o1 'x))) (define-method (op o2 (o1 <py-float>)) - (op (slot-ref o1 'x) o2)))) + (op o2 (slot-ref o1 'x))))) (define-syntax-rule (mk-biop1 mk-biop0 op r1) (begin |