diff --git a/ppx_src/src/Records.ml b/ppx_src/src/Records.ml index f878220..4daadc4 100644 --- a/ppx_src/src/Records.ml +++ b/ppx_src/src/Records.ml @@ -151,7 +151,6 @@ let generateSuccessCase {name; spreadName} successExpr = | "...", Some spreadName -> spreadName | _ -> name in - let _ = Printf.printf "spreadName: %s\n" actualNameToUseForOkayPayload in { pc_lhs = ( mknoloc actualNameToUseForOkayPayload |> Pat.var |> fun p ->