COMMON: #121 Fix array access regression

Author: chrisws

ChangeLog

@@ -1,3 +1,6 @@
+2021-05-03 (12.22)
+	COMMON: Fix array access regression
+
 2021-05-03 (12.22)
 	ANDROID: Removes path navigation to show unified view of available folder
 

samples/distro-examples/tests/array.bas

@@ -327,3 +327,12 @@ sub xfunc(argx)
 end
 z=anims[0].framePoses[0, 0].translation
 xfunc(anims[0].framePoses[0, 0].translation)
+
+dim a()
+append a, [1,2],[3,4],[5,6]
+a << [7,8,9]
+if (a[0] != [1,2]) then throw "err1"
+if (a[1] != [3,4]) then throw "err2"
+if (a[2] != [5,6]) then throw "err3"
+if (a[3] != [7,8,9]) then throw "err4"
+

src/common/scan.c

@@ -1339,7 +1339,7 @@ void comp_expression(char *expr, byte no_parser) {
       ptr++;
       level++;
       // can't be a code array if this is already part of a variable
-      if ((bc.size == 0 || bc.ptr[0] != kwTYPE_VAR) && comp_is_code_array(&bc, ptr)) {
+      if (comp_is_code_array(&bc, ptr)) {
         // otherwise treat as array index
         bc_add_fcode(&bc, kwCODEARRAY);
       }