Fix for membership test with constant LHS

diff --git a/lang/m2/comp/code.c b/lang/m2/comp/code.c
index 2fc638b..2bc8f75 100644 (file)
--- 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);