diff options
Diffstat (limited to 'modules/language/python/string.scm')
| -rw-r--r-- | modules/language/python/string.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/modules/language/python/string.scm b/modules/language/python/string.scm index 74eb0d7..d4cb74b 100644 --- a/modules/language/python/string.scm +++ b/modules/language/python/string.scm @@ -17,10 +17,13 @@ py-partition py-replace py-strip py-title py-rpartitio py-rindex py-split py-rsplit py-splitlines py-startswith py-swapcase py-translate py-zfill - pystring-listing <py-string> pystring)) + pystring-listing <py-string> pystring py-string?)) (define-syntax-rule (aif it p x y) (let ((it p)) (if it x y))) +(define (py-string? x) + (or (string? x) + (is-a? x <py-string>))) (define-class <py-string> () str) (name-object <py-string>) |