diff options
Diffstat (limited to 'modules/language/python/module/os.scm')
| -rw-r--r-- | modules/language/python/module/os.scm | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/modules/language/python/module/os.scm b/modules/language/python/module/os.scm index 7823633..64c93b2 100644 --- a/modules/language/python/module/os.scm +++ b/modules/language/python/module/os.scm @@ -230,6 +230,16 @@ (raise (ValueError "cant stringify k in env[x]"))))))) (if r r (raise IndexError))))) + (define __contains__ + (lambda (self k) + (let ((r ((@ (guile) getenv) + (catch #t + (lambda () + (pystring k)) + (lambda x + #f))))) + r))) + (define __setitem__ (lambda (self k v) (call-with-values |