it goes pretty far

`Dot_of_tast.dot_of_tast "let rec fact n = if n = 0 then 1. else float n *. fact (n - 1) ;; module A = struct let b = 0. let derp = Some [true, false], 'h', 3. +. (4. *. 6.)  end  ";;`

lib/dune

@@ -1,8 +1,25 @@
 (env
  (dev (flags (:standard -warn-error -A))))
 
- (library
+(library
  (name dot_of_tast)
+  (modules dot_of_tast)
+ (libraries
+   logs.fmt
+   fmt
+   merlin-lib.kernel
+   merlin-lib.analysis
+   merlin-lib.ocaml_merlin_specific
+   merlin-lib.ocaml_utils
+   merlin-lib.ocaml_preprocess
+   merlin-lib.ocaml_parsing
+   merlin-lib.ocaml_typing
+   ocamlgraph
+))
+
+(library
+ (name graph_of_tast)
+  (modules graph_of_tast)
  (libraries
    logs.fmt
    fmt