mercurylang/mercury
1
0
Fork 0
mirror of https://github.com/Mercury-Language/mercury.git synced 2026-04-15 17:33:38 +00:00
Code Issues Projects Releases Wiki Activity

Assorted library fixes and stubs for the Java backend.

Browse Source 
Branches: main

java/runtime/ForeignEnumFunctorDesc.java:
java/runtime/TypeCtorInfo_Struct.java:
java/runtime/TypeFunctors.java:
library/backjump.m:
library/builtin.m:
library/io.m:
library/math.m:
library/mutvar.m:
library/par_builtin.m:
library/private_builtin.m:
library/region_builtin.m:
library/rtti_implementation.m:
library/store.m:
library/string.m:
library/thread.semaphore.m:
library/time.m:
library/type_desc.m:
        Assorted library fixes and stubs for the Java backend.
This commit is contained in:
Peter Wang
2009-04-22 03:03:17 +00:00
parent 2bbb2529d7
commit dd53891e9f
17 changed files with 189 additions and 48 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
java/runtime/ForeignEnumFunctorDesc.java
View File

@@ -15,6 +15,6 @@ public class ForeignEnumFunctorDesc {
public ForeignEnumFunctorDesc(String name, int ordinal, int value) {
foreign_enum_functor_name = name;
foreign_enum_functor_ordinal = ordinal;
foreign_enum_functor_value = value
foreign_enum_functor_value = value;
}
}

5
java/runtime/TypeCtorInfo_Struct.java
View File

@@ -23,6 +23,7 @@ public class TypeCtorInfo_Struct extends PseudoTypeInfo {
public mercury.runtime.TypeLayout type_layout;
public int type_ctor_num_functors;
public /* short */ int type_ctor_flags;
public java.lang.Integer[] type_functor_number_map;
public TypeCtorInfo_Struct(
int type_arity, int version, int num_ptags, int rep,
@@ -32,7 +33,8 @@ public class TypeCtorInfo_Struct extends PseudoTypeInfo {
java.lang.Object name_ordered_functor_descs,
// mercury.runtime.TypeLayout
java.lang.Object value_ordered_functor_descs,
int num_functors, int flags)
int num_functors, int flags,
java.lang.Integer[] functor_number_map)
{
arity = type_arity;
type_ctor_version = version;
@@ -47,6 +49,7 @@ public class TypeCtorInfo_Struct extends PseudoTypeInfo {
type_layout = (mercury.runtime.TypeLayout)
value_ordered_functor_descs;
type_ctor_flags = flags;
type_functor_number_map = functor_number_map;
}
// XXX this should be renamed `equals'

2
java/runtime/TypeFunctors.java
View File

@@ -22,7 +22,7 @@ public class TypeFunctors {
public mercury.runtime.EnumFunctorDesc[] functors_enum() {
return (mercury.runtime.EnumFunctorDesc[]) functors_init;
}
public mercury.runtime.ForeignFunctorDesc[] functors_foreign_enum() {
public mercury.runtime.ForeignEnumFunctorDesc[] functors_foreign_enum() {
return (mercury.runtime.ForeignEnumFunctorDesc[]) functors_init;
}
public mercury.runtime.NotagFunctorDesc functors_notag() {