From a90ab84a0be0c62c7a6cd0f2d2bf22209b83f311 Mon Sep 17 00:00:00 2001 From: Matt Birkholz Date: Mon, 6 Mar 2017 20:49:40 -0700 Subject: [PATCH] Load necessary options (not loaded when Edwin is not loaded). --- tests/ffi/test-ffi.scm | 1 + tests/runtime/test-mime-codec.scm | 2 ++ tests/runtime/test-process.scm | 2 ++ 3 files changed, 5 insertions(+) diff --git a/tests/ffi/test-ffi.scm b/tests/ffi/test-ffi.scm index db4169b26..748fa8b78 100644 --- a/tests/ffi/test-ffi.scm +++ b/tests/ffi/test-ffi.scm @@ -26,6 +26,7 @@ USA. ;;;; Build and test the test plugin. +(load-option 'synchronous-subprocess) (with-working-directory-pathname (directory-pathname (current-load-pathname)) (lambda () (let ((port (notification-output-port))) diff --git a/tests/runtime/test-mime-codec.scm b/tests/runtime/test-mime-codec.scm index 8f1424673..829da4e8c 100644 --- a/tests/runtime/test-mime-codec.scm +++ b/tests/runtime/test-mime-codec.scm @@ -28,6 +28,8 @@ USA. (declare (usual-integrations)) +(load-option 'mime-codec) + (define (test-encoder n-packets packet-length text? filename initialize finalize update) (call-with-output-file filename diff --git a/tests/runtime/test-process.scm b/tests/runtime/test-process.scm index e49a0b556..d21472682 100644 --- a/tests/runtime/test-process.scm +++ b/tests/runtime/test-process.scm @@ -28,6 +28,8 @@ USA. (declare (usual-integrations)) +(load-option 'subprocess) + (define (shell-subprocess command) (start-pipe-subprocess "/bin/sh" `#("/bin/sh" "-c" ,command) '#())) -- 2.25.1