small change to measure time taken by parser

links-lang · Mar 18, 2024 · c51d709 · c51d709
1 parent 1a7b8f6
commit c51d709
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/bin/driver.ml b/bin/driver.ml
@@ -162,7 +162,7 @@ module Phases = struct
     = fun initial_context filename ->
     (* Process source file (and its dependencies. *)
     let result =
-      Parse.run initial_context filename
+      (Debug.debug_time "Parsing" (fun () -> Parse.run initial_context filename))
       |> Desugar.run
       |> (fun result -> if Settings.get typecheck_only then exit 0 else result)
       |> Compile.IR.run

diff --git a/links.opam b/links.opam
@@ -23,7 +23,7 @@ doc: "https://links-lang.org/quick-help.html"
 bug-reports: "https://github.com/links-lang/links/issues"
 depends: [
   "dune" {>= "2.7"}
-  "ocaml" { >= "5.1.0"}
+  "ocaml" { >= "5.1.1"}
   "dune-configurator" { >= "3.8"}
   "ppx_deriving"
   "ppx_deriving_yojson" {>= "3.3"}