summaryrefslogtreecommitdiff
path: root/modules/language/python/string.scm
diff options
context:
space:
mode:
Diffstat (limited to 'modules/language/python/string.scm')
-rw-r--r--modules/language/python/string.scm8
1 files changed, 1 insertions, 7 deletions
diff --git a/modules/language/python/string.scm b/modules/language/python/string.scm
index 084d933..f94580c 100644
--- a/modules/language/python/string.scm
+++ b/modules/language/python/string.scm
@@ -24,13 +24,7 @@
(define-syntax-rule (aif it p x y) (let ((it p)) (if it x y)))
(define (scm-str x)
- (cond
- ((string? x)
- x)
- ((is-a? x <py-string>)
- (slot-ref (pystring x) 'str))
- (else
- #f)))
+ (slot-ref (pystring x) 'str))
(define (scm-sym x)
(if (symbol? x)