X-Git-Url: https://git.xandkar.net/?p=tiger.ml.git;a=blobdiff_plain;f=tiger%2Fsrc%2Fexe%2Ftigerc.ml;h=708ff17c97bada7eba22402ffcfd2437ca3d1b2b;hp=fd58a833daf24d8ed4b548715b9a85c644e00303;hb=28875fece2374a41510edbef416311c308695774;hpb=4309a757776e6528be720605fe04442ae46c39b8

diff --git a/tiger/src/exe/tigerc.ml b/tiger/src/exe/tigerc.ml
index fd58a83..708ff17 100644
--- a/tiger/src/exe/tigerc.ml
+++ b/tiger/src/exe/tigerc.ml
@@ -10,7 +10,7 @@ let () =
       Printf.printf
         "Syntax error in file %S, around line: %d, column: %d\n"
         path_to_program_file pos_lnum (pos_cnum - pos_bol)
-  | program ->
-      print_endline program
+  | absyn ->
+      print_endline (Tiger.Absyn.to_string absyn)
   );
   close_in ic;