# HG changeset patch
# User Shinji KONO <kono@ie.u-ryukyu.ac.jp>
# Date 1291375288 -32400
# Node ID 59ebc5cb2a99673c28e2d48d2a74639b8aa06608
# Parent  51b230253f27eae9b50bbd56eedd7d905593d3e9
array offset peep hole

diff -r 51b230253f27 -r 59ebc5cb2a99 mc-inline.c
--- a/mc-inline.c	Fri Dec 03 20:12:52 2010 +0900
+++ b/mc-inline.c	Fri Dec 03 20:21:28 2010 +0900
@@ -543,6 +543,7 @@
         }
     } 
     int e2 = pexpr(cadr(e));
+    if (car(e2)==INDIRECT) e2 = cadr(e2);
     if (OP(car(e2))==ADD) {
 	int c = caddr(e2);
 	if (car(c)==CONST) { e2 = cadr(e2); offset = cadr(c); }