[m-rev.] diff: fix compilation problem with mdbcomp library in erlang grade

[Julien Fischer]

Branches: main, 11.01

Fix a compilation problem in the mdbcomp library with the erlang grade.

mdbomp/rtti_access.m:
 	Provide an Erlang definition for proc_bytecode_bytes/1 since
 	the Mercury definition refers to the Mercury definition of
 	the type bytecode_bytes/0 and the latter isn't overridden
 	by a foreign type pragma in the erlang grade.

Julien.

Index: mdbcomp/rtti_access.m
===================================================================
RCS file: /home/mercury/mercury1/repository/mercury/mdbcomp/rtti_access.m,v
retrieving revision 1.16
diff -u -r1.16 rtti_access.m
--- mdbcomp/rtti_access.m	20 Dec 2010 07:47:48 -0000	1.16
+++ mdbcomp/rtti_access.m	2 Jan 2011 17:31:45 -0000
@@ -564,6 +564,13 @@
      if (1 == 1) throw new Error(\"not supported in java grade\");
  ").

+:- pragma foreign_proc("Erlang",
+    proc_bytecode_bytes(_ProcLayout::in) = (_ByteCodeBytes::out),
+    [will_not_call_mercury, thread_safe, promise_pure],
+"
+    throw({""not supported in erlang grade""})
+").
+
      % Default version for non-C backends.
  proc_bytecode_bytes(_) = dummy_bytecode_bytes.


--------------------------------------------------------------------------
mercury-reviews mailing list
Post messages to:       mercury-reviews at csse.unimelb.edu.au
Administrative Queries: owner-mercury-reviews at csse.unimelb.edu.au
Subscriptions:          mercury-reviews-request at csse.unimelb.edu.au
--------------------------------------------------------------------------