FIXED: invoke correct predicate

Noted by Oleg Finkelstein. Many thanks!
2025-04-25 18:39:21 +02:00
parent d51cbd67e0
commit 073ec4c1d0
1 changed files with 1 additions and 1 deletions
--- 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)