Make tests compatible with uncurried mode by making partial application explicit.

Author: cristianoc

analysis/tests/src/Completion.res

@@ -319,7 +319,7 @@ let ff = (~opt1=0, ~a, ~b, (), ~opt2=0, (), ~c) => a + b + c + opt1 + opt2
 
 type callback = (~a: int) => int
 
-let withCallback: (~b: int) => callback = (~b, ~a) => a + b
+let withCallback: (~b: int) => callback = (~b) => { (); (~a) => a + b }
 
 // withCallback(~
 //               ^com

analysis/tests/src/CompletionFunctionArguments.res

@@ -17,7 +17,7 @@ let tLocalVar = false
 // let _ = someFn(~isOff=)
 //                       ^com
 
-let _ = someFn(
+let _ = @res.partial someFn(
   ~isOn={
     // switch someFn(~isOn=)
     //                     ^com

analysis/tests/src/Highlight.res

@@ -69,7 +69,7 @@ let foo = x => x.T.someField
 
 let add = (~hello as x, ~world) => x + world
 
-let _ = add(~hello=3)
+let _ = @res.partial add(~hello=3)
 
 let _ = <div scale="abc"> <div /> </div>
 

analysis/tests/src/Xform.res

@@ -63,5 +63,5 @@ let bar = () => {
       }
     //^xfm
   }
-  Inner.foo(1)
+  @res.partial Inner.foo(1)
 }

analysis/tests/src/expected/CompletionFunctionArguments.res.txt

@@ -63,8 +63,8 @@ Path someFn
   }]
 
 Complete src/CompletionFunctionArguments.res 21:27
-posCursor:[21:27] posNoWhite:[21:26] Found expr:[19:8->25:1]
-Pexp_apply ...[19:8->19:14] (~isOn20:3->20:7=...[21:7->23:8])
+posCursor:[21:27] posNoWhite:[21:26] Found expr:[19:21->25:1]
+Pexp_apply ...[19:21->19:27] (~isOn20:3->20:7=...[21:7->23:8])
 posCursor:[21:27] posNoWhite:[21:26] Found expr:[21:7->23:8]
 posCursor:[21:27] posNoWhite:[21:26] Found expr:[21:7->21:28]
 posCursor:[21:27] posNoWhite:[21:26] Found expr:[21:14->21:28]

analysis/tests/src/expected/Highlight.res.txt

@@ -81,7 +81,7 @@ Variable: x [69:21->69:22]
 Variable: world [69:24->69:30]
 Lident: x 69:35 Variable
 Lident: world 69:39 Variable
-Lident: add 71:8 Variable
+Lident: add 71:21 Variable
 JsxTag <: 73:8
 Lident: div 73:9 JsxLowercase
 Lident: div 73:36 JsxLowercase