Advertisement
Guest User

Untitled

a guest
Nov 5th, 2013
74
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
OCaml 0.37 KB | None | 0 0
  1. class bs a m =
  2.     let _mode = m and _arch = a in
  3.     let bsh = bs_open _arch _mode in
  4.     object
  5.         method test code addr count =
  6.             let a = 42 in
  7.             match bs with
  8.             | None ->
  9.               let b = 42 in
  10.               printf ":(\n"
  11.             | Some _ ->
  12.               let b = 42 in
  13.               printf "Hello world\n"
  14.     end;;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement