FIXED: countall/2 for zero solutions (#1996)

Example: ?- countall(false, 0). true.
2023-09-05 19:39:05 +02:00
parent 5585e83fd6
commit d54c3369b3
1 changed files with 1 additions and 1 deletions
--- a/src/lib/iso_ext.pl
+++ b/src/lib/iso_ext.pl
@@ -370,7 +370,7 @@ countall(Goal, N) :-
    (   integer(N) ->
        (   N < 0 ->
            domain_error(not_less_than_zero, N, countall/2)
-        ;   N > 0
+        ;   true
        )
    ;   true
    ),