diff options
Diffstat (limited to 'modules/language/python/list.scm')
-rw-r--r-- | modules/language/python/list.scm | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/modules/language/python/list.scm b/modules/language/python/list.scm index e488e45..78b141e 100644 --- a/modules/language/python/list.scm +++ b/modules/language/python/list.scm @@ -116,11 +116,17 @@ (to-pylist (string->list o))) (define-method (bool (o <py-list>)) - (not (= (len o) 0))) + (if (= (len o) 0) + #f + o)) (define-method (bool (o <vector>)) - (not (= (len o) 0))) + (if (= (len o) 0) + #f + o)) (define-method (bool (o <string>)) - (not (= (len o) 0))) + (if (= (len o) 0) + #f + o)) (define-method (to-pylist l) (if (null? l) |