From 0ae5288ab76ec1f9f4b6faf3a1f25d8834ac81f0 Mon Sep 17 00:00:00 2001 From: ceriel 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); -- 2.34.1