diff options
Diffstat (limited to 'modules/language/python/string.scm')
-rw-r--r-- | modules/language/python/string.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/modules/language/python/string.scm b/modules/language/python/string.scm index 81b5a06..6c31f1e 100644 --- a/modules/language/python/string.scm +++ b/modules/language/python/string.scm @@ -24,7 +24,9 @@ (define-syntax-rule (aif it p x y) (let ((it p)) (if it x y))) (define (scm-str x) - (slot-ref (pystring x) 'str)) + (if (string? x) + x + (slot-ref (pystring x) 'str))) (define (scm-sym x) (if (symbol? x) |