update tests

Author: aspeddro

jscomp/syntax/tests/parsing/errors/expressions/expected/array.res.txt

@@ -8,4 +8,6 @@
 
   Did you forget a `]` here?
 
-let xs = x.map (fun key -> [|key;(predicates.(key))|])
+let xs =
+  x.map
+    (fun key -> [|key;(((Array.get)[@res.syntaxSugar ]) predicates key)|])

jscomp/syntax/tests/parsing/grammar/expressions/expected/async.res.txt

@@ -21,7 +21,7 @@ let async =
     () |. async;
     async ();
     async.async;
-    { async = (async.(async)) };
+    { async = (((Array.get)[@res.syntaxSugar ]) async async) };
     (result |. async) |. (mapAsync (fun a -> doStuff a)))
   [@res.braces ])
 let f =

jscomp/syntax/tests/parsing/grammar/expressions/expected/await.res.txt

@@ -9,8 +9,9 @@ let () =
   ((let response = ((fetch {js|/users.json|js})[@res.await ]) in
     let users = ((response.json ())[@res.await ]) in
     let comments =
-      ((((fetch {js|comment.json|js})[@res.await ]).json ())
-      [@res.await ]).(0) in
+      ((Array.get)[@res.syntaxSugar ])
+        ((((fetch {js|comment.json|js})[@res.await ]).json ())[@res.await ])
+        0 in
     Js.log2 users comments)
   [@res.braces ])
 let () = ((delay 10)[@res.braces ][@res.await ])

jscomp/syntax/tests/parsing/grammar/expressions/expected/binaryNoEs6Arrow.res.txt

@@ -31,4 +31,5 @@
                      | _ -> ())
                    [@res.braces ]))[@res.namedArgLoc ][@res.braces ])
       ~children:[] ())[@JSX ])
-;;if inclusions.(index) <- (uid, url) then onChange inclusions
+;;if ((inclusions.(index) <- (uid, url))[@res.syntaxSugar ])
+  then onChange inclusions

jscomp/syntax/tests/parsing/grammar/expressions/expected/bracedOrRecord.res.txt

@@ -12,10 +12,10 @@ let e = ((a + b)[@res.braces ])
 let e = ((if a then true else false)[@res.braces ][@res.ternary ])
 let e = ((if a |> computation then true else false)
   [@res.braces ][@res.ternary ])
-let e = ((a.(0))[@res.braces ])
+let e = ((((Array.get)[@res.syntaxSugar ]) a 0)[@res.braces ])
 let e = ((f b)[@res.braces ])
 let e = (((a.b).c)[@res.braces ])
-let e = ((arr.(x) <- 20)[@res.braces ])
+let e = ((arr.(x) <- 20)[@res.braces ][@res.syntaxSugar ])
 let e = ((fun x -> (x + 1) |> (doStuff config))[@res.braces ])
 let e = (((fun x -> x + 1) |> (doStuff config))[@res.braces ])
 let e = ((if fun x -> x + 1 then true else false)

jscomp/syntax/tests/parsing/grammar/expressions/expected/bsObject.res.txt

@@ -6,7 +6,7 @@ let y = [%obj { age = 30; name = {js|steve|js} }]
 let z =
   [%obj { \xff = 1; \u2212 = {js|two|js}; \0 = zero; \o123 = {js|o123|js} }]
 let x = (({js|age|js})[@res.braces ])
-let x = (({js|age|js}.(0))[@res.braces ])
+let x = ((((Array.get)[@res.syntaxSugar ]) {js|age|js} 0)[@res.braces ])
 let x = (({js|age|js} |. Js.log)[@res.braces ])
 let x = ((if {js|age|js} then true else false)[@res.braces ][@res.ternary ])
 let x = (({js|age|js} |. Js.log; (let foo = 1 in let bar = 2 in foo + bar))
@@ -16,5 +16,7 @@ let x =
     [@res.ternary ]);
     (let foo = 1 in let bar = 2 in foo + bar))
   [@res.braces ])
-let x = (({js|age|js}.(0); (let foo = 1 in let bar = 2 in foo + bar))
+let x =
+  ((((Array.get)[@res.syntaxSugar ]) {js|age|js} 0;
+    (let foo = 1 in let bar = 2 in foo + bar))
   [@res.braces ])

jscomp/syntax/tests/parsing/grammar/expressions/expected/firstClassModule.res.txt

@@ -41,36 +41,41 @@ let build_dispatch_table handlers =
   [@res.braces ])
 ;;(module Three)
 ;;((module Three) : (module X_int))
-;;(module Teenager).(0)
+;;((Array.get)[@res.syntaxSugar ]) (module Teenager) 0
 ;;((module Teenager) |. age) |. Js.log
-;;((module Teenager).(0)) |. Js.log
+;;(((Array.get)[@res.syntaxSugar ]) (module Teenager) 0) |. Js.log
 ;;((if ((module Teenager) |. age) |. isAdult
     then Js.log {js|has responsibilities|js}
     else Js.log {js|can play in the playground|js})[@res.ternary ])
-;;((if ((module Streets).(0)) |. isExpensive
+;;((if (((Array.get)[@res.syntaxSugar ]) (module Streets) 0) |. isExpensive
     then Js.log {js|big money|js}
     else Js.log {js|affordable|js})[@res.ternary ])
 let () = ((((module Teenager) |. age) |. Js.log)[@res.braces ])
-let () = (((module Teenager).(0))[@res.braces ])
+let () = ((((Array.get)[@res.syntaxSugar ]) (module Teenager) 0)
+  [@res.braces ])
 let () =
   ((if ((module Teenager) |. age) |. isAdult
     then Js.log {js|has responsibilities|js}
     else Js.log {js|can play in the playground|js})
   [@res.braces ][@res.ternary ])
 let () =
-  ((if ((module Streets).(0)) |. isExpensive
+  ((if (((Array.get)[@res.syntaxSugar ]) (module Streets) 0) |. isExpensive
     then Js.log {js|big money|js}
     else Js.log {js|affordable|js})
   [@res.braces ][@res.ternary ])
 let () =
   ((let a = 1 in
-    let b = 2 in (module Teenager).(0); ((module Teenager) |. age) |. Js.log)
+    let b = 2 in
+    ((Array.get)[@res.syntaxSugar ]) (module Teenager) 0;
+    ((module Teenager) |. age) |. Js.log)
   [@res.braces ])
 let () =
   ((let a = 1 in
     let b = 2 in
     ((module Teenager) |. age) |. Js.log;
-    ((if (((module Teenager).(0)) |. age) |. isAdult
+    ((if
+        ((((Array.get)[@res.syntaxSugar ]) (module Teenager) 0) |. age) |.
+          isAdult
       then Js.log {js|has responsibilities|js}
       else Js.log {js|can play in the playground|js})
     [@res.ternary ]))

jscomp/syntax/tests/parsing/grammar/expressions/expected/primary.res.txt

@@ -5,11 +5,14 @@ let x = p.Parser.token
 let x = (p.Lang.Parser.token).pos
 ;;lexbuf.lnum <- (lexbuf.lnum + 1)
 ;;(parser.lexbuf).lnum <- ((parser.lexbuf).lnum + 1)
-let x = arr.(0)
-let x = arr.((x : int))
-let x = (arr.(0)).(1)
-let x = (arr.((x : int))).((y : int))
-;;arr.(0) <- (a + b)
+let x = ((Array.get)[@res.syntaxSugar ]) arr 0
+let x = ((Array.get)[@res.syntaxSugar ]) arr (x : int)
+let x =
+  ((Array.get)[@res.syntaxSugar ]) (((Array.get)[@res.syntaxSugar ]) arr 0) 1
+let x =
+  ((Array.get)[@res.syntaxSugar ])
+    (((Array.get)[@res.syntaxSugar ]) arr (x : int)) (y : int)
+;;((arr.(0) <- (a + b))[@res.syntaxSugar ])
 ;;f ()
 ;;(f ()) ()
 ;;f a

jscomp/syntax/tests/printer/comments/expected/array.res.txt

@@ -1,4 +1,4 @@
-a[/* zz */ 0] = 7
+(@res.syntaxSugar a[/* zz */ 0] = 7)
 
 let _ = /* zz */ a[0]
 

jscomp/syntax/tests/printer/expr/expected/arraySet.res.txt

@@ -1,5 +1,8 @@
-numbers[20] = 10
+(@res.syntaxSugar numbers[20] = 10)
 
-streetsAddressBookThisIsALongName[
-  streets->Belt.Array.length - 1
-] = streetWithAVeryVeryVerrrrrrryVeeeeeeeeeryLongName
+(
+  @res.syntaxSugar
+  streetsAddressBookThisIsALongName[
+    streets->Belt.Array.length - 1
+  ] = streetWithAVeryVeryVerrrrrrryVeeeeeeeeeryLongName
+)

jscomp/syntax/tests/printer/expr/expected/braced.res.txt

@@ -220,18 +220,24 @@ let _ = {module(ME: MyMod)}
 }[{
   0
 }]
-{myArray}[{0}] = {20}
-{
-  myArray
-}[{
-  0
-}] = {
-  20
-}
+(@res.syntaxSugar {myArray}[{0}] = {20})
+(
+  @res.syntaxSugar
+  {
+    myArray
+  }[{
+    0
+  }] = {
+    20
+  }
+)
 
-myArray[20] = {
-  a + b
-}
+(
+  @res.syntaxSugar
+  myArray[20] = {
+    a + b
+  }
+)
 
 {jsObject}["foo"]
 {jsObject}["foo"] = {"bar"}

jscomp/syntax/tests/printer/expr/expected/if.res.txt

@@ -36,7 +36,7 @@ let x =
     sideEffect()
   }
 
-if inclusions[index] = (uid, url) {
+if @res.syntaxSugar inclusions[index] = (uid, url) {
   onChange(inclusions)
 }
 

jscomp/syntax/tests/printer/expr/expected/unary.res.txt

@@ -84,4 +84,4 @@ let () = {
 }
 
 let x = (!truths)[0]
-(!streets)[0] = "foo-street"
+(@res.syntaxSugar (!streets)[0] = "foo-street")

jscomp/syntax/tests/printer/expr/expected/underscoreApply.res.txt

@@ -49,7 +49,7 @@ f(a, b, _) ? g(x, y, _) : h(alpha, beta, _)
 <div> {f(a, b, _)} </div>
 
 f(a, b, _)[ix]
-f(a, b, _)[ix] = 2
+(@res.syntaxSugar f(a, b, _)[ix] = 2)
 
 getDirector(a, b, _).name = "Steve"