mirror of
https://github.com/Mercury-Language/mercury.git
synced 2025-12-14 13:23:53 +00:00
edd61c4e58
Estimated hours taken: 4 Branches: main Add some more code to the temporary, partial Java versions of the Mercury library modules. This allows us to test the Java back-end on a few extra test cases and could help prevent regression errors. mercury/java/library/array.java: mercury/java/library/benchmarking.java: mercury/java/library/bintree.java: mercury/java/library/bintree_set.java: mercury/java/library/construct.java: mercury/java/library/dir.java: mercury/java/library/exception.java: mercury/java/library/lexer.java: mercury/java/library/math.java: mercury/java/library/parser.java: mercury/java/library/random.java: mercury/java/library/rtti_implementation.java: mercury/java/library/set_ordlist.java: mercury/java/library/set_unordlist.java: mercury/java/library/store.java: mercury/java/library/table_builtin.java: mercury/java/library/term_io.java: mercury/java/library/varset.java: Added these files. They are partial (or empty) versions of the Mercury library modules written in Java. mercury/java/library/bool.java: mercury/java/library/builtin.java: mercury/java/library/io.java: mercury/java/library/mr_int.java: mercury/java/library/private_builtin.java: mercury/java/library/std_util.java: mercury/java/library/string.java: Add additional code to these files.
52 lines
1.0 KiB
Java
52 lines
1.0 KiB
Java
//
|
|
// Copyright (C) 2002-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;
|
|
|
|
public class std_util
|
|
{
|
|
|
|
public static boolean semidet_succeed_0_p_0()
|
|
{
|
|
return true;
|
|
}
|
|
|
|
public static mercury.list.list_1 cons_3_p_0(
|
|
mercury.private_builtin.type_info_1 TypeInfo_for_T_6,
|
|
java.lang.Object H_4,
|
|
mercury.list.list_1 T_5)
|
|
{
|
|
{
|
|
boolean succeeded = false;
|
|
mercury.list.list_1 HeadVar__3_3 = null;
|
|
|
|
{
|
|
HeadVar__3_3 = new mercury.list.list_1.f_cons_2(H_4, T_5);
|
|
}
|
|
return HeadVar__3_3;
|
|
}
|
|
}
|
|
|
|
public static class pair_2
|
|
{
|
|
public java.lang.Object F1 = null;
|
|
public java.lang.Object F2 = null;
|
|
|
|
public pair_2(
|
|
java.lang.Object F1,
|
|
java.lang.Object F2)
|
|
{
|
|
{
|
|
((mercury.std_util.pair_2) (this)).F1 = F1;
|
|
((mercury.std_util.pair_2) (this)).F2 = F2;
|
|
}
|
|
}
|
|
}
|
|
|
|
}
|
|
|