30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
chicken.process-context
chicken.process-context.posix
srfi-1
(prefix mtargs args:))
(define setenv set-environment-variable!)
))
;;======================================================================
;; debug stuff
;;======================================================================
(define verbosity (make-parameter '()))
|
>
|
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
chicken.process-context
chicken.process-context.posix
srfi-1
(prefix mtargs args:))
(define setenv set-environment-variable!)
(define unsetenv unset-environment-variable!)
))
;;======================================================================
;; debug stuff
;;======================================================================
(define verbosity (make-parameter '()))
|