Mercurial > hg > index.cgi
changeset 109:6a919c3ca0e9
Fixed pragma noindex0tonone to work
author | lost@l-w.ca |
---|---|
date | Sun, 07 Aug 2011 10:23:14 -0600 |
parents | 9960e05cbe3a |
children | 38c1537857ce |
files | lwasm/insn_indexed.c |
diffstat | 1 files changed, 31 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lwasm/insn_indexed.c Sun Aug 07 00:58:00 2011 -0600 +++ b/lwasm/insn_indexed.c Sun Aug 07 10:23:14 2011 -0600 @@ -340,7 +340,22 @@ v = lw_expr_intval(e2); // we have a reducible expression here which depends on // the size of this instruction - if (v < -128 || v > 127) + if (v == 0 && !CURPRAGMA(l, PRAGMA_NOINDEX0TONONE) && (l -> pb & 0x07) <= 4) + { + if ((l -> pb & 0x07) < 4) + { + pb = 0x84 | ((l -> pb & 0x03) << 5) | ((l -> pb & 0x80) ? 0x10 : 0); + } + else + { + pb = (l -> pb & 0x80) ? 0x90 : 0x8F; + } + l -> pb = pb; + lw_expr_destroy(e2); + l -> lint = 0; + return; + } + else if (v < -128 || v > 127) { l -> lint = 2; switch (l -> pb & 0x07) @@ -429,7 +444,21 @@ { // we know how big it is v = lw_expr_intval(e); - if (v < -128 || v > 127) + if (v == 0 && !CURPRAGMA(l, PRAGMA_NOINDEX0TONONE) && (l -> pb & 0x07) <= 4) + { + if ((l -> pb & 0x07) < 4) + { + pb = 0x84 | ((l -> pb & 0x03) << 5) | ((l -> pb & 0x80) ? 0x10 : 0); + } + else + { + pb = (l -> pb & 0x80) ? 0x90 : 0x8F; + } + l -> pb = pb; + l -> lint = 0; + return; + } + else if (v < -128 || v > 127) { do16bit: l -> lint = 2;