add broken example test

Author: zth

analysis/src/CompletionFrontEnd.ml

@@ -136,6 +136,7 @@ let findArgCompletables ~(args : arg list) ~endPos ~posBeforeCursor
          })
   | _ -> loop args
 
+(* TODO: Mimic pipe chain detection here? *)
 let rec exprToContextPath (e : Parsetree.expression) =
   match e.pexp_desc with
   | Pexp_constant (Pconst_string _) -> Some Completable.CPString
@@ -930,7 +931,11 @@ let completionWithParser1 ~currentFile ~debug ~offset ~path ~posCursor ~text =
           let oldScope = !scope in
           let oldCtxPath = !currentCtxPath in
           (* TODO: Haven't figured out how to count unlabelled args here yet... *)
-          (* TODO: This is broken *)
+          (* TODO: This is broken. I'm trying to set the CArgument context path
+             below here continuously for each argument as I traverse the expr
+             for the arg, but I end up piling them on each other. So what should
+             be Carg $0, then Carg $1, then Carg $3... is now (faulty) Carg $0,
+             then Carg Carg $0 $1, then Carg Carg Carg $0 $1 $2, and so on. *)
           (match !currentCtxPath with
           | None -> ()
           | Some ctxPath ->

analysis/tests/src/CompletionInferValues.res

@@ -45,3 +45,7 @@ module Div = {
 
 // let _ = <Div onMouseEnter={event => { event->pr }} />
 //                                                ^com
+
+// Pipe are broken, need to fix
+// let _ = <div onMouseEnter={event => { let btn = event->JsxEvent.Mouse.button; btn-> }} />
+//                                                                                    ^com

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

@@ -127,3 +127,13 @@ Completable: Cpath Value[event]->pr <<jsx>>
     "documentation": null
   }]
 
+Complete src/CompletionInferValues.res 49:86
+posCursor:[49:86] posNoWhite:[49:85] Found expr:[49:12->49:92]
+JSX <div:[49:12->49:15] onMouseEnter[49:16->49:28]=...[49:36->49:88]> _children:49:90
+posCursor:[49:86] posNoWhite:[49:85] Found expr:[49:36->49:88]
+posCursor:[49:86] posNoWhite:[49:85] Found expr:[49:41->49:86]
+posCursor:[49:86] posNoWhite:[49:85] Found expr:[49:81->0:-1]
+posCursor:[49:86] posNoWhite:[49:85] Found expr:[49:81->0:-1]
+Completable: Cpath Value[btn]-> <<jsx>>
+[]
+