mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-18 19:03:45 +00:00
31 lines
789 B
Mathematica
31 lines
789 B
Mathematica
%---------------------------------------------------------------------------%
|
|
% vim: ft=mercury ts=4 sw=4 et
|
|
%---------------------------------------------------------------------------%
|
|
%
|
|
% Running "mmc --make-interface" on this module used to result in a
|
|
% compiler abort. This was because
|
|
%
|
|
% - due to the abstract-exported type depending on bool, the compiler
|
|
% deciced that the import of the bool module in the implementation section
|
|
% was needed, but
|
|
%
|
|
% - the module bool was imported in the interface as well.
|
|
%
|
|
% The abort was caused by an overzealous sanity check that insisted
|
|
% on the absence of any such duplication.
|
|
%
|
|
|
|
:- module int_imp_test_2.
|
|
:- interface.
|
|
|
|
:- import_module bool.
|
|
|
|
:- type t1
|
|
---> f1(bool).
|
|
|
|
:- type t2.
|
|
|
|
:- implementation.
|
|
|
|
:- type t2 == bool.
|