summaryrefslogtreecommitdiff
path: root/modules/language/python/dict.scm
diff options
context:
space:
mode:
Diffstat (limited to 'modules/language/python/dict.scm')
-rw-r--r--modules/language/python/dict.scm11
1 files changed, 9 insertions, 2 deletions
diff --git a/modules/language/python/dict.scm b/modules/language/python/dict.scm
index 194da2d..f32b134 100644
--- a/modules/language/python/dict.scm
+++ b/modules/language/python/dict.scm
@@ -636,7 +636,7 @@
(lambda (yield)
(for ((k v : (ref self '_dict))) ()
(yield (renorm k) v)))))))
-
+
(define pop
(lambda (self k . l)
(apply pylist-pop! (ref self '_dict) (norm k) l)))
@@ -669,7 +669,14 @@
(define __repr__
(lambda (self)
- (format #f "Ns:~a" (ref (ref self '_dict) '__name__))))
+ (for ((k v : (ref self '_dict))) ((l '()))
+ (cons (format #f "~a:~a" k v) l)
+ #:final
+ (aif it (ref (ref self '_dict) '__name__)
+ (format #f "Ns-~a: ~a" it (reverse l))
+ (format #f "Ns: ~a" (reverse l))))))
+
+ (define __str__ __repr__)
(define __getattr__
(lambda (self key)