a45395857d
so hopefully i get farther with the other method and this branch is lost to history. but in case it's not, lol
36 lines
947 B
Org Mode
36 lines
947 B
Org Mode
* usage:
|
|
|
|
evaulate the following in ur ocaml toplevel (`$ ocaml`):
|
|
|
|
```
|
|
#use_output "dune ocaml top";;
|
|
Dot_of_tast.dot_of_tast "let rec fact n = if n = 0 then 1. else float n *. fact (n - 1)";;
|
|
```
|
|
|
|
run in shell to see output:
|
|
```
|
|
$ xdot x.dot
|
|
```
|
|
|
|
|
|
** current development pattern
|
|
|
|
[cqc@fynn typedastsch]$ ocaml
|
|
OCaml version 4.14.0
|
|
Enter #help;; for help.
|
|
|
|
Findlib has been successfully loaded. Additional directives:
|
|
#require "package";; to load a package
|
|
#list;; to list the available packages
|
|
#camlp4o;; to load camlp4 (standard syntax)
|
|
#camlp4r;; to load camlp4 (revised syntax)
|
|
#predicates "p,q,...";; to set these predicates
|
|
Topfind.reset();; to force that packages will be reloaded
|
|
#thread;; to enable threads
|
|
|
|
# #use_output "dune top";;
|
|
# Dot_of_tast.merlin_parse "let x = 0;;"
|
|
;;
|
|
Exception: Assert_failure ("src/kernel/mocaml.ml", 29, 2).
|
|
#
|