From 10a021b51ee785cec2f86cf094d100d6028a72e2 Mon Sep 17 00:00:00 2001
From: Zeex <zeex@rocketmail.com>
Date: Fri, 1 May 2015 09:40:40 +0600
Subject: [PATCH] Tiny consistency fix

---
 source/compiler/sc1.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/source/compiler/sc1.c b/source/compiler/sc1.c
index 96974fd..084816e 100644
--- a/source/compiler/sc1.c
+++ b/source/compiler/sc1.c
@@ -2513,7 +2513,7 @@ static cell initarray(int ident,int tag,int dim[],int numdim,int cur,
       error(18);                /* initialization data exceeds array size */
       break;
     } /* if */
-    if (cur<numdim-2) {
+    if (cur+2<numdim) {
       dsize=initarray(ident,tag,dim,numdim,cur+1,startlit,counteddim,
                       lastdim,enumroot,errorfound);
     } else {