Files
mercury/tests/warnings/non_stratification.m
Zoltan Somogyi c03b11ca48 Update the style of more test cases.
And updated expected outputs for changed line numbers.
2021-07-27 19:29:21 +10:00

18 lines
363 B
Mathematica

%---------------------------------------------------------------------------%
% vim: ts=4 sw=4 et ft=mercury
%---------------------------------------------------------------------------%
:- module non_stratification.
:- interface.
:- pred foo(int::in) is semidet.
:- implementation.
:- import_module int.
foo(1).
foo(2).
foo(3).
foo(X) :-
not foo(X - 1).