1. Yoshihiro Imai
  2. lambda-translator

Source

lambda-translator / main.ml

Diff from to

File main.ml

     let ts = tokens [] in
     let tm = Parser.parse ts in
     prerr_endline @@ "parse: " ^ sterm tm;
+    prerr_newline ();
+    prerr_endline @@ " -- scheme code";
     prerr_endline @@ Gen_scheme.gen tm;
+
+    prerr_newline ();
+    prerr_endline @@ " -- ruby code";
+    prerr_endline @@ Gen_ruby.gen tm;
+
+    prerr_newline ();
+    prerr_endline @@ " -- javascript code";
+    prerr_endline @@ Gen_javascript.gen tm;
+
   with
   | Parser.Error msg -> prerr_endline @@ "parse error: " ^ msg;
   | e -> prerr_endline ("ERRR: " ^ Printexc.to_string e)