mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-22 12:53:47 +00:00
8879695e64
Estimated hours taken: 0.5 compiler/typecheck.m: Fix a bug which caused a spurious type error when compiling the compiler with --intermodule-optimization. tests/valid/Mmakefile: tests/valid/intermod_record.m: tests/valid/intermod_record2.m: Test case.
16 lines
160 B
Mathematica
16 lines
160 B
Mathematica
:- module intermod_record2.
|
|
|
|
:- interface.
|
|
|
|
:- type record.
|
|
|
|
:- func field(record) = int.
|
|
|
|
:- implementation.
|
|
|
|
:- type record
|
|
---> record(
|
|
field :: int
|
|
).
|
|
|