Fix windows import

This commit is contained in:
Yota Toyama 2023-10-13 17:21:11 +11:00
parent 77dc8c3524
commit f41a61f748

View file

@ -1,8 +1,8 @@
(define-library (scheme process-context) (define-library (scheme process-context)
(import (chibi) (only (scheme base) call/cc) (srfi 98)) (import (chibi) (only (scheme base) call/cc) (srfi 98))
(cond-expand (windows (import (rename (chibi win32 process-win32) (exit emergency-exit)))) (cond-expand (windows (import (prefix (only (chibi win32 process-win32) exit) process-)))
(else (import (prefix (chibi process) process-)))) (else (import (prefix (only (chibi process) exit) process-))))
(export get-environment-variable get-environment-variables (export get-environment-variable get-environment-variables
command-line exit emergency-exit) command-line exit emergency-exit)