Files
mercury/tests/valid/intermod_user_equality_nested.m
Simon Taylor cd286bc20f Fix a bug in inter-module optimization reported by Zoltan.
Estimated hours taken: 1

Fix a bug in inter-module optimization reported by Zoltan.

compiler/intermod.m:
	Make sure that user-defined equality predicates are exported
	if the types are exported.

compiler/hlds_data.m:
	Add predicate hlds_data__set_type_defn_body, to update the
	body of a discriminated union type after module qualifying
	the user-defined equality predicate.

tests/valid/Mmakefile:
tests/valid/intermod_user_equality.m:
tests/valid/intermod_user_equality2.m:
tests/valid/intermod_user_equality_nested.m:
tests/valid/intermod_user_equality_nested2.m:
	Test case.
2000-01-31 03:59:09 +00:00

12 lines
210 B
Mathematica

:- module intermod_user_equality_nested.
:- interface.
:- import_module intermod_user_equality_nested2.
:- pred check_foo(foo::in, foo::in) is semidet.
:- implementation.
check_foo(Foo, Bar) :- Foo = Bar.