diff options
Diffstat (limited to 'modules/language/python/spec.scm')
| -rw-r--r-- | modules/language/python/spec.scm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/modules/language/python/spec.scm b/modules/language/python/spec.scm index 4b05cbf..8f39e0c 100644 --- a/modules/language/python/spec.scm +++ b/modules/language/python/spec.scm @@ -21,10 +21,11 @@ (define dolog #f) (define (pr . x) (when dolog - (define port (open-file "log.txt" "a")) - (with-output-to-port port - (lambda () - (pretty-print x) (car (reverse x)))) + (let () + (define port (open-file "log.txt" "a")) + (with-output-to-port port + (lambda () + (pretty-print x) (car (reverse x))))) (close port)) (car (reverse x))) |