Files
mercury/tests/warnings/unused_interface_import.m
2015-02-27 15:41:25 +11:00

18 lines
469 B
Mathematica

%---------------------------------------------------------------------------%
% vim: ts=4 sw=4 et ft=mercury
%---------------------------------------------------------------------------%
:- module unused_interface_import.
:- interface.
:- import_module unused_interface_import3.
:- import_module unused_interface_import2. % Should warn about this.
:- typeclass tc1(T) <= tc2(T) where [].
:- implementation.
:- import_module unit.
:- instance tc1(unit) where [].