diff options
| author | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-04-12 21:33:56 +0200 |
|---|---|---|
| committer | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-04-12 21:33:56 +0200 |
| commit | 1fe962f1c47ae9de46298a7420b10ec271b2b9b7 (patch) | |
| tree | a824c97351e77a7164f1076bfc021afba8d6d211 /modules/language/python/bool.scm | |
| parent | c653e3aca875247001fc49ac3c7b51f3b4771698 (diff) | |
io module tested and debugged
Diffstat (limited to 'modules/language/python/bool.scm')
| -rw-r--r-- | modules/language/python/bool.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/modules/language/python/bool.scm b/modules/language/python/bool.scm index 3eb6bc8..461dc26 100644 --- a/modules/language/python/bool.scm +++ b/modules/language/python/bool.scm @@ -1,5 +1,6 @@ (define-module (language python bool) #:use-module (oop goops) + #:use-module (language python exceptions) #:use-module (oop pf-objects) #:export (bool)) @@ -9,6 +10,8 @@ (cond ((null? x) #f) + ((eq? x None) + #f) (else x))) (define-method (bool (x <integer>)) (not (= x 0))) |