From: Alex Smith <ais523@bham.ac.uk>
Date: Thu, 2 Sep 2010 19:53:21 +0000 (+0100)
Subject: Fix optimiser bug: select with LHS a constant with more than 16 consecutive zeros
X-Git-Tag: 0.29~41^2~17
X-Git-Url: http://thyrsus.com/gitweb/?a=commitdiff_plain;h=fcf1baaaafcf0b72d235eac4f72642574d0e3b2a;p=intercal.git

Fix optimiser bug: select with LHS a constant with more than 16 consecutive zeros
---

diff --git a/src/dekludge.c b/src/dekludge.c
index 8c6cf49..ddcff8d 100644
--- a/src/dekludge.c
+++ b/src/dekludge.c
@@ -463,7 +463,7 @@ void checknodeactbits(node *np)
     /*@-nullderef@*/
     np->optdata = ick_iselect((unsigned)np->lval->optdata, (unsigned)np->rval->optdata);
     /*@=nullderef@*/
-    temp=16;
+    temp=32;
     while(temp--) np->optdata|=(np->optdata>>1); /* fill in gaps in optdata */
     break;