mercurylang/mercury
1
0
Fork 0
mirror of https://github.com/Mercury-Language/mercury.git synced 2025-12-18 07:15:19 +00:00
Code Issues Projects Releases Wiki Activity

Changes and additions to the Java back-end so that:

Browse Source 
Estimated hours taken: 90
Branches: main

Changes and additions to the Java back-end so that:
 o  While tags shouldn't be generated, they do get generated in some cases
    and are now handled correctly.
 o  The Java back-end now generates class constructors.
 o  The Java back-end is now able to simulate the behaviour of function
    pointers, which are used for closures, continuations, as well as unify
    and compare.


mercury/compiler/mlds_to_java.m:
	Extensive changes to existing code to implement tags and class
	constructors. Also, addition of code to search MLDS for uses of
	function pointers and to generate MLDS for wrapper classes. As well
	as many small bug fixes.
	Removed some (unfinished) code for dealing with Unify and Compare, this
	code was redundant now that function pointers have been implemented.

mercury/compiler/java_util.m:
	Updated to return noops for most tag operators.

mercury/java/MethodPtr.java:
	New file. This is the interface which the wrapper classes used for
	function pointers extend.
This commit is contained in:
Michael Wybrow
2002-01-23 22:23:14 +00:00
parent b5a84362e8
commit bbba5416f3
3 changed files with 875 additions and 407 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
compiler/java_util.m
View File

@@ -1,11 +1,11 @@
%-----------------------------------------------------------------------------%
% Copyright (C) 2001 The University of Melbourne.
% Copyright (C) 2002 The University of Melbourne.
% This file may only be copied under the terms of the GNU General
% Public License - see the file COPYING in the Mercury distribution.
%-----------------------------------------------------------------------------%
% File: java_util.m
% Main author: juliensf.
% Main authors: juliensf, mjwybrow.
% This module defines utility routines that are used by the
% Java backend. Much of the code below is similar to that in c_util.m;
@@ -76,22 +76,20 @@
%-----------------------------------------------------------------------------%
java_util__unary_prefix_op(mktag, _) :-
unexpected(this_file, "Java backend does not support tags").
java_util__unary_prefix_op(tag, _) :-
unexpected(this_file, "Java backend does not support tags").
java_util__unary_prefix_op(unmktag, _) :-
unexpected(this_file, "Java backend does not support tags").
java_util__unary_prefix_op(strip_tag, _) :-
unexpected(this_file, "Java backend does not support tags").
java_util__unary_prefix_op(mkbody, _) :-
unexpected(this_file, "Java backend does not support tags").
java_util__unary_prefix_op(unmkbody, _) :-
unexpected(this_file, "Java backend does not support tags").
java_util__unary_prefix_op(hash_string, _) :-
sorry(this_file, "hash_string operators not supported yet").
% Tags are not used in the Java back-end, as such, all of the tagging
% operators except for `tag' return no-ops. The `tag' case is handled
% seperately in mlds_to_java__output_std_unop.
%
java_util__unary_prefix_op(mktag, "/* mktag */ ").
java_util__unary_prefix_op(unmktag, "/* unmktag */ ").
java_util__unary_prefix_op(strip_tag, "/* strip_tag */ ").
java_util__unary_prefix_op(mkbody, "/* mkbody */ ").
java_util__unary_prefix_op(unmkbody, "/* unmkbody */ ").
java_util__unary_prefix_op(hash_string, "mercury.String.hash_1_f_0").
java_util__unary_prefix_op(bitwise_complement, "~").
java_util__unary_prefix_op(not, "!").
java_util__unary_prefix_op((not), "!").
java_util__unary_prefix_op(tag, ""). % This case is never used.
java_util__string_compare_op(str_eq, "==").
java_util__string_compare_op(str_ne, "!=").