diff options
Diffstat (limited to 'manual/tools/transfmain.ml')
| -rw-r--r-- | manual/tools/transfmain.ml | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/manual/tools/transfmain.ml b/manual/tools/transfmain.ml new file mode 100644 index 0000000000..49d9840de4 --- /dev/null +++ b/manual/tools/transfmain.ml @@ -0,0 +1,8 @@ +let main() = + let lexbuf = Lexing.from_channel stdin in + if Array.length Sys.argv >= 2 && Sys.argv.(1) = "-html" + then Htmltransf.main lexbuf + else Transf.main lexbuf; + exit 0;; + +Printexc.print main ();; |