diff options
author | Erick Tryzelaar <idadesub@users.sourceforge.net> | 2010-03-08 19:32:18 +0000 |
---|---|---|
committer | Erick Tryzelaar <idadesub@users.sourceforge.net> | 2010-03-08 19:32:18 +0000 |
commit | 9ef76b9985a0c408e126affa049698c413ad8664 (patch) | |
tree | 79fb162db230c0fa8cb3a67bd6df1db7c25d755a /docs/tutorial/OCamlLangImpl3.html | |
parent | 0ef3fa6aabc80995c8a0bd829c85c89ef2d4c32d (diff) | |
download | external_llvm-9ef76b9985a0c408e126affa049698c413ad8664.zip external_llvm-9ef76b9985a0c408e126affa049698c413ad8664.tar.gz external_llvm-9ef76b9985a0c408e126affa049698c413ad8664.tar.bz2 |
Update the OCaml Kaleidoscope tutorial.
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@97965 91177308-0d34-0410-b5e6-96231b3b80d8
Diffstat (limited to 'docs/tutorial/OCamlLangImpl3.html')
-rw-r--r-- | docs/tutorial/OCamlLangImpl3.html | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/docs/tutorial/OCamlLangImpl3.html b/docs/tutorial/OCamlLangImpl3.html index 0d69207..febd7f5 100644 --- a/docs/tutorial/OCamlLangImpl3.html +++ b/docs/tutorial/OCamlLangImpl3.html @@ -98,6 +98,7 @@ exception Error of string let the_module = create_module (global_context ()) "my cool jit" let builder = builder (global_context ()) let named_values:(string, llvalue) Hashtbl.t = Hashtbl.create 10 +let double_type = double_type context </pre> </div> @@ -389,7 +390,7 @@ that there is an LLVM Function object that is ready to go for us.</p> <div class="doc_code"> <pre> (* Create a new basic block to start insertion into. *) - let bb = append_block "entry" the_function in + let bb = append_block context "entry" the_function in position_at_end bb builder; try @@ -903,6 +904,7 @@ let context = global_context () let the_module = create_module context "my cool jit" let builder = builder context let named_values:(string, llvalue) Hashtbl.t = Hashtbl.create 10 +let double_type = double_type context let rec codegen_expr = function | Ast.Number n -> const_float double_type n @@ -974,7 +976,7 @@ let codegen_func = function let the_function = codegen_proto proto in (* Create a new basic block to start insertion into. *) - let bb = append_block "entry" the_function in + let bb = append_block context "entry" the_function in position_at_end bb builder; try |