Files
mercury/tests/invalid/tricky_assert.m
2024-05-30 20:42:34 +10:00

15 lines
463 B
Mathematica

%---------------------------------------------------------------------------%
% vim: ts=4 sw=4 et ft=mercury
%---------------------------------------------------------------------------%
%
% This is invalid because the interface refers to stuff defined
% only in the implementation.
:- module tricky_assert.
:- interface.
:- promise tricky_assert.local.
:- implementation.
:- pred tricky_assert.local is semidet.
:- pragma external_pred(tricky_assert.local/0).