mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-15 17:33:38 +00:00
b1c5fb300f
Estimated hours taken: 0.5 Branches: main java/library/builtin.java: Define stubs for the generic unify and compare, to avoid errors from the Java compiler when compiling automatically-generated type-specific unify and compare procedures for polymorphic types.
45 lines
1.2 KiB
Java
45 lines
1.2 KiB
Java
|
|
//
|
|
// Copyright (C) 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.
|
|
//
|
|
//
|
|
|
|
package mercury;
|
|
|
|
public class builtin
|
|
{
|
|
|
|
public static mercury.private_builtin.type_info_1 builtin__type_ctor_info_int_0 = new mercury.private_builtin.type_info_1();
|
|
|
|
public static mercury.private_builtin.type_info_1 builtin__type_ctor_info_string_0 = new mercury.private_builtin.type_info_1();
|
|
|
|
public static class comparison_result_0 {
|
|
public static final int f_equal = (int) 0;
|
|
public static final int f_less_than = (int) 1;
|
|
public static final int f_greater_than = (int) 2;
|
|
public int value;
|
|
|
|
public comparison_result_0(int val) {
|
|
this.value = val;
|
|
return;
|
|
}
|
|
}
|
|
|
|
public static boolean unify_2_p_0(mercury.private_builtin.type_info_1 ti,
|
|
java.lang.Object x, java.lang.Object y)
|
|
{
|
|
throw new Java.lang.Error("unify/3 not implemented");
|
|
}
|
|
|
|
public static comparison_result_0 compare_3_p_0(
|
|
mercury.private_builtin.type_info_1 ti,
|
|
java.lang.Object x, java.lang.Object y)
|
|
{
|
|
throw new Java.lang.Error("compare/3 not implemented");
|
|
}
|
|
}
|
|
|
|
|