Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- class bs a m =
- let _mode = m and _arch = a in
- let bsh = bs_open _arch _mode in
- object
- method test code addr count =
- let a = 42 in
- match bs with
- | None ->
- let b = 42 in
- printf ":(\n"
- | Some _ ->
- let b = 42 in
- printf "Hello world\n"
- end;;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement