diff options
Diffstat (limited to 'modules/language/python/module/sys.scm')
| -rw-r--r-- | modules/language/python/module/sys.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/modules/language/python/module/sys.scm b/modules/language/python/module/sys.scm index fe0a4ea..d24b7e2 100644 --- a/modules/language/python/module/sys.scm +++ b/modules/language/python/module/sys.scm @@ -4,6 +4,7 @@ #:use-module (language python hash) #:use-module (language python module io) #:use-module (language python try) + #:use-module (language python string) #:use-module (language python module python) #:use-module (oop pf-objects) #:export (argv byteorder copyright implementation @@ -92,8 +93,9 @@ (define exec_prefix "/usr/local") (define executable "") (define exit - (lambda arg - (apply raise SystemException arg))) + (lambda (arg) + (raise (SystemException ((@ (guile) format) + #f "exit called with arg ~a" arg))))) (define flags '()) (define float_info '()) |