diff options
Diffstat (limited to 'modules/language/python/string.scm')
| -rw-r--r-- | modules/language/python/string.scm | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/modules/language/python/string.scm b/modules/language/python/string.scm index ad47a20..81b5a06 100644 --- a/modules/language/python/string.scm +++ b/modules/language/python/string.scm @@ -536,9 +536,13 @@ ((self s) (cond ((is-a? s <py-string>) - (slot-set! self 'str (slot-ref s 'src))) + (slot-ref s 'src)) ((is-a? s <string>) - (slot-set! self 'str s)))))) + s) + (else + (__init__ self ((@ (guile) format) #f "~a" s))))))) + + (define __new__ (lambda x (apply __init__ x))) (define __repr__ (lambda (self) |