From 70d65bcea841d8c2e2b8f16d34d2f9ea53683917 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Bennet=20Ble=C3=9Fmann?= Date: Sat, 26 Jul 2025 21:18:15 +0200 Subject: [PATCH] add another test and remove unecessary module qualification --- src/lib/process.pl | 2 +- tests/scryer/cli/windows/process.md | 5 +++++ 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/src/lib/process.pl b/src/lib/process.pl index d02713e9..878b295d 100644 --- a/src/lib/process.pl +++ b/src/lib/process.pl @@ -149,7 +149,7 @@ must_be_known_options(Valid, Found, [X|XS]) :- check_options([], _). check_options([X | XS], Options) :- (Kinds, Pred, Default, Choice) = X, - tfilter(process:find_option(Kinds), Options, Solutions), + tfilter(find_option(Kinds), Options, Solutions), ( Solutions = [] -> Choice = Default; Solutions = [Provided] -> call(Pred, Provided), Choice = Provided ; diff --git a/tests/scryer/cli/windows/process.md b/tests/scryer/cli/windows/process.md index c83520cc..2b3fdbf5 100644 --- a/tests/scryer/cli/windows/process.md +++ b/tests/scryer/cli/windows/process.md @@ -2,3 +2,8 @@ $ scryer-prolog -f --no-add-history -g 'use_module(library(process)), process_create("cmd", ["/C", "exit", "1"], [process(P)]), process_wait(P, exit(1)), halt' ``` + +```trycmd +$ scryer-prolog -f --no-add-history -g 'use_module(library(process)), use_module(library(format)), process_create("cmd", [], [process(P), stdout(null), stdin(pipe(S))]), format(S, "exit 1~n", []), process_wait(P, Status), halt' + +``` \ No newline at end of file -- 2.54.0