From 330ef2953f31dd7a5b64ff72919c4d7d696c7a83 Mon Sep 17 00:00:00 2001
From: Stefan Israelsson Tampe <stefan.itampe@gmail.com>
Date: Tue, 8 May 2018 21:20:04 +0200
Subject: imporved multistring symbol support

---
 modules/oop/pf-objects.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'modules/oop')

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))))
-- 
cgit v1.2.3