[m-rev.] Trivial diff: add infix java binary op

[Ralph Becket]

Estimated hours taken: 0.25
Branches: main

This change fixes a compiler abort while compiling array.m in grade java.

compiler/java_util.m:
	Added a translation for ">=" as a binary infix operator.
	Reordered the code to match the order of binary_op in
	compiler/builtin_ops.m.

Index: compiler/java_util.m
===================================================================
RCS file: /home/mercury1/repository/mercury/compiler/java_util.m,v
retrieving revision 1.8
diff -u -r1.8 java_util.m
--- compiler/java_util.m	15 Mar 2003 03:08:54 -0000	1.8
+++ compiler/java_util.m	28 Mar 2003 05:59:53 -0000
@@ -117,19 +117,20 @@
 java_util__binary_infix_op(-, "-").
 java_util__binary_infix_op(*, "*").
 java_util__binary_infix_op(/, "/").
+java_util__binary_infix_op(mod, "%").
 java_util__binary_infix_op(<<, "<<").
 java_util__binary_infix_op(>>, ">>").
 java_util__binary_infix_op(&, "&").
 java_util__binary_infix_op('|', "|").
 java_util__binary_infix_op(^, "^").
-java_util__binary_infix_op(mod, "%").
-java_util__binary_infix_op(eq, "==").
-java_util__binary_infix_op(ne, "!=").
 java_util__binary_infix_op(and, "&&").
 java_util__binary_infix_op(or, "||").
+java_util__binary_infix_op(eq, "==").
+java_util__binary_infix_op(ne, "!=").
 java_util__binary_infix_op(<, "<").
 java_util__binary_infix_op(>, ">").
 java_util__binary_infix_op(<=, "<=").
+java_util__binary_infix_op(>=, ">=").
 
 %------------------------------------------------------------------------------%
 
--------------------------------------------------------------------------
mercury-reviews mailing list
post:  mercury-reviews at cs.mu.oz.au
administrative address: owner-mercury-reviews at cs.mu.oz.au
unsubscribe: Address: mercury-reviews-request at cs.mu.oz.au Message: unsubscribe
subscribe:   Address: mercury-reviews-request at cs.mu.oz.au Message: subscribe
--------------------------------------------------------------------------