mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-16 18:03:36 +00:00
Runtime fixes for the Java back-end.
Estimated hours taken: 2 Branches: main Runtime fixes for the Java back-end. java/runtime/DuExistLocn.java: java/runtime/DuFunctorDesc.java: java/runtime/DuPtagLayout.java: Define constructors for these types. java/runtime/MaybeResAddrFunctorDesc.java: New file (corresponds to MR_MaybeResAddrFunctorDesc type in C). java/runtime/MaybeResFunctorDesc.java: New file (corresponds to MR_MaybeResFunctorDesc type in C). java/runtime/PseudoTypeInfo.java: Define constructors. Make non-abstract (XXX temp work-around only). java/runtime/TypeCtorInfo_Struct.java: XXX Pass some parameters of the constructor as "Object", to work around type errors in invocations of those constructors. java/runtime/TypeFunctors.java: java/runtime/TypeLayout.java: Model the C unions better; use a single field, with accessor functions that convert to each alternative, not several fields. java/runtime/TypeclassInfo.java: Implement as stub (previous code was just copy of TypeInfo.java). java/runtime/VA_PseudoTypeInfo_Struct*.java: Fix a bug: change the order of the constructor parameters to match the way we generate code which invokes those constructors.
This commit is contained in:
22
java/runtime/MaybeResAddrFunctorDesc.java
Normal file
22
java/runtime/MaybeResAddrFunctorDesc.java
Normal file
@@ -0,0 +1,22 @@
|
||||
//
|
||||
// Copyright (C) 2003 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.
|
||||
//
|
||||
|
||||
package mercury.runtime;
|
||||
|
||||
public class MaybeResAddrFunctorDesc {
|
||||
public java.lang.String maybe_res_name;
|
||||
public int maybe_res_arity;
|
||||
public boolean maybe_res_is_res;
|
||||
public MaybeResFunctorDesc maybe_res_ptr;
|
||||
public MaybeResAddrFunctorDesc(java.lang.String name, int arity,
|
||||
boolean is_res, MaybeResFunctorDesc ptr)
|
||||
{
|
||||
maybe_res_name = name;
|
||||
maybe_res_arity = arity;
|
||||
maybe_res_is_res = is_res;
|
||||
maybe_res_ptr = ptr;
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user