mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-18 19:03:45 +00:00
9ead91a087
tests/valid_make_int/bug506.m:
tests/valid_make_int/bug506_sub.m:
The test case. bug506_sub.m defines a type whose name is a Mercury
operator; we test whether the compiler can read its .int3 file
when generating the .int file of bug506.m.
tests/valid_make_int/Mmakefile:
Enable the new case, after adding infrastructure for handling
multi-module programs.
15 lines
329 B
Mathematica
15 lines
329 B
Mathematica
%---------------------------------------------------------------------------%
|
|
% vim: ft=mercury ts=4 sw=4 et
|
|
%---------------------------------------------------------------------------%
|
|
|
|
:- module bug506.
|
|
:- interface.
|
|
|
|
:- import_module bug506_sub.
|
|
|
|
:- func make_rule(int) = (rule).
|
|
|
|
:- implementation.
|
|
|
|
make_rule(N) = rule(N).
|