[m-dev.] trivial diff: add missing #includes to test case
Fergus Henderson
fjh at cs.mu.OZ.AU
Thu Feb 1 05:28:38 AEDT 2001
Estimated hours taken: 0.25
tests/hard_coded/typeclasses/existential_type_classes.m:
Add some missing #includes that showed up when this test case was
compiled with `--target asm'.
Workspace: /home/hg/fjh/gcc-cvs/gcc/mercury
Index: tests/hard_coded/typeclasses/existential_type_classes.m
===================================================================
RCS file: /home/mercury1/repository/tests/hard_coded/typeclasses/existential_type_classes.m,v
retrieving revision 1.6
diff -u -d -r1.6 existential_type_classes.m
--- tests/hard_coded/typeclasses/existential_type_classes.m 2000/12/05 02:11:14 1.6
+++ tests/hard_coded/typeclasses/existential_type_classes.m 2001/01/31 18:22:01
@@ -63,6 +63,10 @@
my_exist_t = 43.
+:- pragma c_header_code("
+ #include ""mercury_heap.h"" /* for MR_incr_hp() */
+ #include ""mercury_tags.h"" /* for MR_field() */
+").
:- pragma c_code(my_univ_value(Univ::in) = (Value::out), will_not_call_mercury, "
TypeClassInfo_for_existential_type_classes__fooable_T =
MR_field(MR_mktag(0), Univ, 0);
--
Fergus Henderson <fjh at cs.mu.oz.au> | "I have always known that the pursuit
| of excellence is a lethal habit"
WWW: <http://www.cs.mu.oz.au/~fjh> | -- the last words of T. S. Garp.
--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to: mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions: mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------
More information about the developers
mailing list