[m-rev.] for review: distinguish type_ctor_infos from type_infos

[Zoltan Somogyi]

On 28-Jan-2002, Fergus Henderson <fjh at cs.mu.OZ.AU> wrote:
> P.S. java/TypeCtorInfo_Struct.java should also be modified to reflect
> your recent changes to the layout of the type_ctor_info structs.

I have committed the following change. Someone who is more familiar with the
Java backend (i.e. Michael or Fergus) may also want to change the field names
to reflect runtime/mercury_type_info.h, both here and in all the places that
refer to them.

Zoltan.

java/TypeCtorInfo_Struct.java:
	Update the TypeCtorInfo structure to reflect the recent bootstrapping
	changes.

Index: TypeCtorInfo_Struct.java
===================================================================
RCS file: /home/mercury1/repository/mercury/java/TypeCtorInfo_Struct.java,v
retrieving revision 1.1
diff -u -b -r1.1 TypeCtorInfo_Struct.java
--- TypeCtorInfo_Struct.java	23 Feb 2001 01:11:02 -0000	1.1
+++ TypeCtorInfo_Struct.java	28 Jan 2002 09:17:05 -0000
@@ -1,5 +1,5 @@
 //
-// Copyright (C) 2001 The University of Melbourne.
+// Copyright (C) 2001-2002 The University of Melbourne.
 // This file may only be copied under the terms of the GNU Library General
 // Public License - see the file COPYING.LIB in the Mercury distribution.
 //
@@ -9,17 +9,14 @@
 public class TypeCtorInfo_Struct {
     
 	public int                              arity;
+	public int                              type_ctor_version;
+	public mercury.runtime.TypeCtorRep      type_ctor_rep;
+	public int                              type_ctor_num_ptags; // if DU
 	public mercury.runtime.Unify            unify_pred;
-	public mercury.runtime.Unify            new_unify_pred;
 	public mercury.runtime.Compare          compare_pred;
-	public mercury.runtime.TypeCtorRep      type_ctor_rep;
-	public mercury.runtime.ProcAddr         unused1;    // spare 
-	public mercury.runtime.ProcAddr         unused2;    // spare 
 	public java.lang.String                 type_ctor_module_name;
 	public java.lang.String                 type_ctor_name;
-	public int                              type_ctor_version;
 	public mercury.runtime.TypeFunctors     type_functors;
 	public mercury.runtime.TypeLayout       type_layout;
 	public int 			        type_ctor_num_functors;
-	public int                              type_ctor_num_ptags; // if DU 
 }
--------------------------------------------------------------------------
mercury-reviews mailing list
post:  mercury-reviews at cs.mu.oz.au
administrative address: owner-mercury-reviews at cs.mu.oz.au
unsubscribe: Address: mercury-reviews-request at cs.mu.oz.au Message: unsubscribe
subscribe:   Address: mercury-reviews-request at cs.mu.oz.au Message: subscribe
--------------------------------------------------------------------------