From: Bennet Bleßmann Date: Sat, 26 Jul 2025 19:18:15 +0000 (+0200) Subject: add another test and remove unecessary module qualification X-Git-Tag: v0.10.0~35^2^2~11 X-Git-Url: https://git.sagredo.dev/?a=commitdiff_plain;h=70d65bcea841d8c2e2b8f16d34d2f9ea53683917;p=scryer-prolog.git add another test and remove unecessary module qualification --- 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