# HG changeset patch
# User lost@l-w.ca
# Date 1313123129 21600
# Node ID 5706712f8a205b6a099b1d1fd99731dd0e72a193
# Parent  3a5f718b24c17ff47567d768fd4ed51c4735e9c0
Allow [>...] for extended indirect

diff -r 3a5f718b24c1 -r 5706712f8a20 lwasm/insn_indexed.c
--- a/lwasm/insn_indexed.c	Thu Aug 11 22:04:09 2011 -0600
+++ b/lwasm/insn_indexed.c	Thu Aug 11 22:25:29 2011 -0600
@@ -161,6 +161,9 @@
 	// if no "," and indirect, do extended indir
 	if (!rn && indir)
 	{
+		// eat the extended addressing indicator if present
+		if (**p == '>')
+			(*p)++;
 		// extended indir
 		l -> pb = 0x9f;
 		e = lwasm_parse_expr(as, p);