[m-dev.] trivial diff: fix bug in boehm_gc/typd_mlc.c

Fergus Henderson fjh at cs.mu.OZ.AU
Thu Nov 23 19:48:11 AEDT 2000


Estimated hours taken: 0.25

boehm_gc/typd_mlc.c:
	Fix an operator precedence bug.
	This one was caught by lcc's warnings.
	I've forwarded to patch to Hans Boehm.

Workspace: /home/pgrad/fjh/ws/hg4
Index: boehm_gc/typd_mlc.c
===================================================================
RCS file: /home/mercury1/repository/mercury/boehm_gc/typd_mlc.c,v
retrieving revision 1.7
diff -u -d -r1.7 typd_mlc.c
--- boehm_gc/typd_mlc.c	2000/09/18 11:08:55	1.7
+++ boehm_gc/typd_mlc.c	2000/11/20 17:44:08
@@ -175,7 +175,7 @@
 register GC_descr descriptor;
 register word nwords;
 {
-    if (descriptor & DS_TAGS == DS_LENGTH) {
+    if ((descriptor & DS_TAGS) == DS_LENGTH) {
         descriptor = GC_bm_table[BYTES_TO_WORDS((word)descriptor)];
     };
     descriptor |= (descriptor & ~DS_TAGS) >> nwords;

-- 
Fergus Henderson <fjh at cs.mu.oz.au>  |  "I have always known that the pursuit
                                    |  of excellence is a lethal habit"
WWW: <http://www.cs.mu.oz.au/~fjh>  |     -- the last words of T. S. Garp.
--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to:       mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions:          mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------



More information about the developers mailing list