diff options
author | Peter Zotov <whitequark@whitequark.org> | 2013-11-03 08:27:45 +0000 |
---|---|---|
committer | Peter Zotov <whitequark@whitequark.org> | 2013-11-03 08:27:45 +0000 |
commit | f00a9e0f79541538df7e3af2e83de37f40d904cc (patch) | |
tree | 3252f086ab4f9d785465fe4d1344ecbba5b48c96 /test/Bindings | |
parent | 88d74c3093de563408ceb834d999613038195e98 (diff) | |
download | llvm-f00a9e0f79541538df7e3af2e83de37f40d904cc.tar.gz llvm-f00a9e0f79541538df7e3af2e83de37f40d904cc.tar.bz2 llvm-f00a9e0f79541538df7e3af2e83de37f40d904cc.tar.xz |
[OCaml] Implement Llvm.MemoryBuffer.{of_string,as_string}
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@193953 91177308-0d34-0410-b5e6-96231b3b80d8
Diffstat (limited to 'test/Bindings')
-rw-r--r-- | test/Bindings/Ocaml/vmcore.ml | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/test/Bindings/Ocaml/vmcore.ml b/test/Bindings/Ocaml/vmcore.ml index 0c4d0d6263..2fb5272546 100644 --- a/test/Bindings/Ocaml/vmcore.ml +++ b/test/Bindings/Ocaml/vmcore.ml @@ -1320,6 +1320,14 @@ let test_pass_manager () = end +(*===-- Memory Buffer -----------------------------------------------------===*) + +let test_memory_buffer () = + group "memory buffer"; + let buf = MemoryBuffer.of_string "foobar" in + insist ((MemoryBuffer.as_string buf) = "foobar") + + (*===-- Writer ------------------------------------------------------------===*) let test_writer () = @@ -1350,5 +1358,6 @@ let _ = suite "instructions" test_instructions; suite "builder" test_builder; suite "pass manager" test_pass_manager; + suite "memory buffer" test_memory_buffer; suite "writer" test_writer; (* Keep this last; it disposes m. *) exit !exit_status |