mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-18 19:03:45 +00:00
fa77e70a46
tests/valid/*: Renamed `*.nl' as `*.m'. Added a few new test cases. Removed a couple of duplicate test cases. Fixed up the Mmake file so that `mmake check' now works.
16 lines
268 B
Mathematica
16 lines
268 B
Mathematica
:- module unreachable_code.
|
|
:- interface.
|
|
|
|
:- type foo ---> foo.
|
|
|
|
:- pred p(foo::in, foo::in) is semidet.
|
|
|
|
:- implementation.
|
|
:- import_module require.
|
|
|
|
p(X, Y) :-
|
|
error("err"),
|
|
X = Y.
|
|
|
|
%-----------------------------------------------------------------------------%
|