1234567891011121314151617181920212223242526272829303132 |
- $OpenBSD: patch-src_test_pl,v 1.3 2014/04/04 17:53:49 edd Exp $
- Turn on verbose reporting.
- GMP test appears to use >64MB of stack!?
- --- src/test.pl.orig Tue Mar 4 10:37:29 2014
- +++ src/test.pl Sat Mar 15 11:37:08 2014
- @@ -23,6 +23,7 @@
-
- %:- set_prolog_flag(optimise, true).
- %:- set_prolog_flag(trace_gc, true).
- +:- set_prolog_flag(verbose, normal).
- :- asserta(user:file_search_path(library, '../packages/plunit')).
- :- [library(plunit)].
- :- set_test_options([load(always), silent(true), sto(true), cleanup(true)]).
- @@ -588,10 +589,10 @@ gmp(shift-1) :-
- gmp(shift-2) :-
- A is 1<<55, B is A<<8,
- B =:= 9223372036854775808.
- -gmp(shift-3) :-
- - unbound(A),
- - forall(between(1, 100, X),
- - catch(A is 1<<(1<<X), error(resource_error(stack), _), true)).
- +%gmp(shift-3) :-
- +% unbound(A),
- +% forall(between(1, 100, X),
- +% catch(A is 1<<(1<<X), error(resource_error(stack), _), true)).
- gmp(fac-1) :-
- fac(25, X),
- X == 15511210043330985984000000. % computed with bc
|