fix culprit

This commit is contained in:
Bennet Bleßmann
2025-07-30 22:14:43 +02:00
committed by Bennet Bleßmann
parent b2d639b159
commit 45041be336
2 changed files with 2 additions and 2 deletions

View File

@@ -142,7 +142,7 @@ must_be_known_options(Valid, Options, Domain, Context) :- must_be_known_options_
must_be_known_options_(_, _, [], _, _).
must_be_known_options_(Valid, Found, [X|XS], Domain, Context) :-
( functor(X, Option, 1) -> true
; domain_error(Domain, Option , Context)
; domain_error(Domain, X , Context)
) ,
( member(Option, Found) -> domain_error(non_duplicate_options, Option , Context)
; member(Option, Valid) -> true