rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

reorder tests, per https://github.com/mthom/scryer-prolog/pull/1961#pullrequestreview-1574380588

Browse Source
This commit is contained in:
Markus Triska
2023-08-11 23:41:54 +02:00
parent 26c0b4fc75
commit 4a6bf5fd5f
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/lib/iso_ext.pl
View File

@@ -121,11 +121,11 @@ bb_get(Key, Value) :-
succ(I, S) :- succ(I, S) :-
can_be(not_less_than_zero, I), can_be(not_less_than_zero, I),
can_be(not_less_than_zero, S), can_be(not_less_than_zero, S),
( integer(I) -> ( integer(S) ->
S is I+1
; integer(S) ->
S > 0, S > 0,
I is S-1 I is S-1
; integer(I) ->
S is I+1
; instantiation_error(succ/2) ; instantiation_error(succ/2)
). ).