fix tests

src/fsharp/TypeChecker.fs

@@ -8223,7 +8223,7 @@ and Propagate cenv overallTy env tpenv (expr: ApplicableExpr) exprty delayed =
                 let mArg = arg.Range
                 match arg with
                 | SynExpr.CompExpr _ -> ()
-                | SynExpr.ArrayOrListOfSeqExpr (_,_,_) ->
+                | SynExpr.ArrayOrListOfSeqExpr (false,_,_) ->
                     // 'delayed' is about to be dropped on the floor, first do rudimentary checking to get name resolutions in its body
                     RecordNameAndTypeResolutions_IdeallyWithoutHavingOtherEffects_Delayed cenv env tpenv delayed
                     if IsIndexerType cenv.g cenv.amap expr.Type then

src/fsharp/ast.fs

@@ -536,7 +536,7 @@ and
     | ForEach of forSeqPoint:SequencePointInfoForForLoop * seqExprOnly:SeqExprOnly * isFromSource:bool * pat:SynPat * enumExpr:SynExpr * bodyExpr:SynExpr * range:range
 
     /// F# syntax: [ expr ], [| expr |]
-    | ArrayOrListOfSeqExpr of isList:bool * expr:SynExpr * range:range
+    | ArrayOrListOfSeqExpr of isArray:bool * expr:SynExpr * range:range
 
     /// CompExpr(isArrayOrList, isNotNakedRefCell, expr)
     ///

tests/fsharpqa/Source/Warnings/SuggestToUseIndexer.fs

@@ -9,6 +9,6 @@ let y = d[1]
 let z = d[|1|]
 
 let f() = d
-let y = (f())[1]
+let a = (f())[1]
 
 exit 0
\ No newline at end of file