From 073ec4c1d0c81d165cb33483e01c0a2ebc038829 Mon Sep 17 00:00:00 2001 From: Markus Triska Date: Fri, 25 Apr 2025 18:39:21 +0200 Subject: [PATCH] FIXED: invoke correct predicate Noted by Oleg Finkelstein. Many thanks! --- src/lib/builtins.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/lib/builtins.pl b/src/lib/builtins.pl index df7696f9..3100f7f9 100644 --- a/src/lib/builtins.pl +++ b/src/lib/builtins.pl @@ -1736,7 +1736,7 @@ chars_or_vars_([C|Cs], PI) :- ( nonvar(C) -> ( atom(C), atom_length(C, 1) -> - chars_or_vars(Cs, PI) + chars_or_vars_(Cs, PI) ; throw(error(type_error(character, C), PI)) ) ; chars_or_vars_(Cs, PI) -- 2.54.0