Tiny consistency fix

2015-05-01 09:40:40 +06:00 · 2015-05-01 09:40:40 +06:00 · 10a021b51e
commit 10a021b51e
parent 3594c6170d
1 changed files with 1 additions and 1 deletions
--- 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 {