Permalink
Browse files

Rw bindings to lists were being mishandled, pmichaud++

  • Loading branch information...
1 parent c248dcf commit 025a6e61603971ce1cfce491601db9b15a13f91e @sorear sorear committed Aug 18, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 lib/CodeGen.cs
View
@@ -2699,9 +2699,9 @@ class NamProcessor {
CpsOp typ = th.Scan(zyg[3]);
CpsOp rhs = th.Scan(zyg[4]);
int ro = JScalar.B(zyg[1]) ? 0 : Kernel.NBV_RW;
- int list = JScalar.B(zyg[2]) ? Kernel.NBV_LIST : 0;
+ int mode = JScalar.B(zyg[2]) ? Kernel.NBV_LIST : ro; // ignore RW if LIST
return CpsOp.MethodCall(Tokens.Kernel_NewBoundVar,
- CpsOp.IntLiteral(ro+list), typ, rhs);
+ CpsOp.IntLiteral(mode), typ, rhs);
};
handlers["whileloop"] = delegate(NamProcessor th, object[] z) {
return CpsOp.While(FixBool(z[1]), FixBool(z[2]),

0 comments on commit 025a6e6

Please sign in to comment.