From 0ae5288ab76ec1f9f4b6faf3a1f25d8834ac81f0 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Tue, 20 Dec 1994 16:00:57 +0000
Subject: [PATCH] Fix for membership test with constant LHS

---
 lang/m2/comp/code.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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);