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

This commit is contained in:
Graydon Hoare 2010-07-02 15:11:44 -07:00
parent 6d58987538
commit b1d3e9697a

View File

@ -821,7 +821,7 @@ let trans_crate
| Ast.STMT_log a -> | Ast.STMT_log a ->
begin 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 (* NB: If you extend this, be sure to update the
* typechecking code in type.ml as well. *) * typechecking code in type.ml as well. *)
Ast.TY_str -> trans_log_str a Ast.TY_str -> trans_log_str a