PPX: use 4.10 ASTs

Resolves ocsigen#765.

Author: aantron

lwt_ppx.opam

@@ -20,8 +20,8 @@ depends: [
   "dune" {>= "1.1.0"}
   "lwt"
   "ocaml" {>= "4.02.0"}
-  "ocaml-migrate-parsetree" {>= "1.4.0"}
-  "ppx_tools_versioned" {>= "5.2.3"}
+  "ocaml-migrate-parsetree" {>= "1.5.0"}
+  "ppx_tools_versioned" {>= "5.3.0"}
 ]
 
 build: [

src/ppx/dune

@@ -6,5 +6,5 @@
  (libraries compiler-libs.common ocaml-migrate-parsetree ppx_tools_versioned)
  (ppx_runtime_libraries lwt)
  (kind ppx_rewriter)
- (preprocess (pps ppx_tools_versioned.metaquot_409 bisect_ppx --conditional))
+ (preprocess (pps ppx_tools_versioned.metaquot_410 bisect_ppx --conditional))
  (flags (:standard -w +A-4)))

src/ppx/ppx_lwt.ml

@@ -1,11 +1,11 @@
 open! Migrate_parsetree
-open! OCaml_409.Ast
+open! OCaml_410.Ast
 open Ast_mapper
 open! Ast_helper
 open Asttypes
 open Parsetree
 
-open Ast_convenience_409
+open Ast_convenience_410
 
 (** {2 Convenient stuff} *)
 
@@ -350,16 +350,16 @@ let mapper =
 
 
 let args =
-  Arg.([
+  [
     "-no-sequence",
-      Unit no_sequence_option,
+      Arg.Unit no_sequence_option,
       " has no effect (deprecated)";
 
     "-no-strict-sequence",
-      Unit no_strict_sequence_option,
+      Arg.Unit no_strict_sequence_option,
       " has no effect (deprecated)";
-  ])
+  ]
 
 let () =
-  Driver.register ~name:"ppx_lwt" ~args Versions.ocaml_409
+  Driver.register ~name:"ppx_lwt" ~args Versions.ocaml_410
     (fun _config _cookies -> mapper)

src/ppx/ppx_lwt.mli

@@ -161,4 +161,4 @@ else
 *)
 
 
-val mapper : Migrate_parsetree.OCaml_409.Ast.Ast_mapper.mapper
+val mapper : Migrate_parsetree.OCaml_410.Ast.Ast_mapper.mapper