diff options
author | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-05-08 21:20:04 +0200 |
---|---|---|
committer | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-05-08 21:20:04 +0200 |
commit | 330ef2953f31dd7a5b64ff72919c4d7d696c7a83 (patch) | |
tree | 72afccbf8c359f536475319d7757c0865b3636a5 /modules/oop | |
parent | 876d5d0fca204adce5335c5486bf6fb3d2188f22 (diff) |
imporved multistring symbol support
Diffstat (limited to 'modules/oop')
-rw-r--r-- | modules/oop/pf-objects.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/modules/oop/pf-objects.scm b/modules/oop/pf-objects.scm index 67dbaa0..25c4960 100644 --- a/modules/oop/pf-objects.scm +++ b/modules/oop/pf-objects.scm @@ -36,7 +36,8 @@ explicitly tell it to not update etc. |# ;; this is mutated by the dict class -(define dictNs '(dictNs)) +(define dictNs '(dictNs)) +(define dictRNs '(dictRNs)) #; (define (pkk . l) @@ -1529,4 +1530,4 @@ explicitly tell it to not update etc. (define-method (py-dict (o <p>)) (aif it (ref o '__dict__) it - (slot-ref o 'h))) + (dictRNs (slot-ref o 'h)))) |