From: ceriel <none@none>
Date: Tue, 20 Dec 1994 16:00:57 +0000 (+0000)
Subject: Fix for membership test with constant LHS
X-Git-Tag: release-5-5~138
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=0ae5288ab76ec1f9f4b6faf3a1f25d8834ac81f0;p=ack.git

Fix for membership test with constant LHS
---

diff --git a/lang/m2/comp/code.c b/lang/m2/comp/code.c
index 2fc638b98..2bc8f75c5 100644
--- a/lang/m2/comp/code.c
+++ b/lang/m2/comp/code.c
@@ -939,7 +939,7 @@ CodeOper(expr, true_label, false_label)
 				break;
 			}
 			CodePExpr(rightop);
-			C_loc(rightop->nd_type->set_low-leftop->nd_INT);
+			C_loc(leftop->nd_INT - rightop->nd_type->set_low);
 		}
 		else {
 			CodePExpr(rightop);