diff options
author | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-09-04 16:19:39 +0200 |
---|---|---|
committer | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-09-04 16:19:39 +0200 |
commit | e37613527a05fc56f8ee5886a868c948b3ee4cfc (patch) | |
tree | 38c51006b81a165133fbd44566940decb06fae5d /modules/language/python/exceptions.scm | |
parent | 8223db0b1a660ad10830e9a5a2fe71858cf52481 (diff) |
pipes
Diffstat (limited to 'modules/language/python/exceptions.scm')
-rw-r--r-- | modules/language/python/exceptions.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/modules/language/python/exceptions.scm b/modules/language/python/exceptions.scm index f2cceee..5b58f9e 100644 --- a/modules/language/python/exceptions.scm +++ b/modules/language/python/exceptions.scm @@ -17,7 +17,8 @@ UnicodeDecodeError LookupError IndentationError KeyboardInterrupt MemoryError NameError EOFError UnicodeError UnicodeEncodeError - FileExistsError FileNotFoundError IsADirectoryError )) + FileExistsError FileNotFoundError IsADirectoryError + EnvironmentError)) (define-syntax-rule (aif it p x y) (let ((it p)) (if it x y))) @@ -69,6 +70,7 @@ (define StopIteration 'StopIteration) (define GeneratorExit 'GeneratorExit) +(define-er EnvironmentError 'EnvironmentError) (define-er UnicodeEncodeError 'UnicodeEncodeError) (define-er FileExistsError 'FileExistsError) (define-er FileNotFoundError 'FileNotFoundError) |