Blob Blame History Raw
--- a/test/instrument/apply/special.t	2022-02-02 07:03:54.000000000 -0700
+++ b/test/instrument/apply/special.t	2022-02-08 16:37:16.423128075 -0700
@@ -97,7 +97,6 @@ Subexpressions are still instrumented.
   > let _ = (:=) (ref (print_endline "foo")) (print_endline "bar")
   > EOF
   let _ = ref (___bisect_post_visit___ 0 (print_endline "foo"))
-  
   let _ = !(ref (___bisect_post_visit___ 1 (print_endline "foo")))
   
   let _ =
@@ -310,5 +309,4 @@ Subexpressions are still instrumented.
        "bar")
   
   let _ = ignore (___bisect_post_visit___ 3 (print_endline "foo"))
-  
   let _ = Obj.magic (___bisect_post_visit___ 4 (print_endline "foo"))
--- a/test/instrument/attribute.t	2022-02-02 07:03:54.000000000 -0700
+++ b/test/instrument/attribute.t	2022-02-08 16:37:16.424128075 -0700
@@ -78,5 +78,4 @@ Non-coverage attributes are preserved un
   [@@@foo print_endline "bar"]
   
   let _ = () [@@foo print_endline "bar"]
-  
   let _ = () [@foo print_endline "bar"]
--- a/test/instrument/class/class.t	2022-02-02 07:03:54.000000000 -0700
+++ b/test/instrument/class/class.t	2022-02-08 16:37:16.424128075 -0700
@@ -22,9 +22,7 @@ Parameters are preserved.
   > end
   > EOF
   class foo_1 () = object end
-  
   class foo_2 ~l:_ = object end
-  
   class foo_3 ?l:_ () = object end
 
 
--- a/test/instrument/class/instvar.t	2022-02-02 07:03:54.000000000 -0700
+++ b/test/instrument/class/instvar.t	2022-02-08 16:37:16.424128075 -0700
@@ -25,6 +25,7 @@ Pexp_override traversed.
   >     val x = ()
   >     method foo = {< x = print_endline "foo" >}
   >   end
+  > EOF
   let _ =
     object
       val x = ()
--- a/test/instrument/value.t	2022-02-02 07:03:54.000000000 -0700
+++ b/test/instrument/value.t	2022-02-08 16:37:16.424128075 -0700
@@ -72,7 +72,6 @@ No instrumentation is inserted into expr
   > let _ = Failure (String.concat "" [])
   > EOF
   let _ = Failure "foo"
-  
   let _ = Failure (___bisect_post_visit___ 0 (String.concat "" []))
 
 
@@ -87,7 +86,6 @@ No instrumentation is inserted into expr
   > let _ = `Foo (print_endline "foo")
   > EOF
   let _ = `Foo "bar"
-  
   let _ = `Foo (___bisect_post_visit___ 0 (print_endline "foo"))
 
 
@@ -96,7 +94,6 @@ No instrumentation is inserted into expr
   > let _ = {contents = print_endline "foo"}
   > EOF
   let _ = { contents = 0 }
-  
   let _ = { contents = ___bisect_post_visit___ 0 (print_endline "foo") }
 
 
@@ -171,7 +168,6 @@ No instrumentation is inserted into expr
   > let _ = fun () -> (print_endline "foo" : unit)
   > EOF
   let _ = (0 : int)
-  
   let _ = (___bisect_post_visit___ 0 (print_endline "foo") : unit)
   
   let _ =
@@ -193,7 +189,6 @@ No instrumentation is inserted into expr
     `Foo
   
   let _ = (___bisect_post_visit___ 1 (f ()) :> [ `Foo | `Bar ])
-  
   let _ = fun () -> (f () :> [ `Foo | `Bar ])