prep for debray allocation

2017-04-29 16:50:53 -06:00
parent 2e7aa6423c
commit a6304d3f96
12 changed files with 815 additions and 710 deletions
--- a/src/main.rs
+++ b/src/main.rs
@@ -200,7 +200,7 @@ mod tests {

        // test shallow cuts.
        submit(&mut wam, "memberchk(X, [X|_]) :- !.
-                          memberchk(X, [_|Xs]) :- !, memberchk(X, Xs).");
+                          memberchk(X, [_|Xs]) :- memberchk(X, Xs).");

        assert_eq!(submit(&mut wam, "?- memberchk(X, [a,b,c]).").failed_query(), false);
        assert_eq!(submit(&mut wam, "?- memberchk([X,X], [a,b,c,[d,e],[d,d]]).").failed_query(), false);