Return LLVM to at least being able to run hello world.

2010-07-02 15:11:44 -07:00 · 2010-07-02 15:11:44 -07:00 · b1d3e9697a
commit b1d3e9697a
parent 6d58987538
1 changed files with 1 additions and 1 deletions
--- a/src/boot/llvm/lltrans.ml
+++ b/src/boot/llvm/lltrans.ml
@ -821,7 +821,7 @@ let trans_crate

              | Ast.STMT_log a ->
                  begin
-                    match Semant.atom_type sem_cx a with
+                    match Semant.simplified_ty (Semant.atom_type sem_cx a) with
                        (* NB: If you extend this, be sure to update the
                         * typechecking code in type.ml as well. *)
                        Ast.TY_str -> trans_log_str a