Advertisement
Guest User

Untitled

a guest
Aug 25th, 2016
201
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
OCaml 1.14 KB | None | 0 0
  1. ( 12:17:42 )< command 1 >──────────────────────────────────────────────────────────{ counter: 0 }
  2. utop # class test (n:int) = object
  3. val num = n
  4. method num = num
  5. end;;
  6. class test : int -> object val num : int method num : int end
  7. ( 12:18:57 )< command 7 >──────────────────────────────────────────────────────────{ counter: 0 }
  8. utop # let a = new test 1;;
  9. val a : test = <obj>
  10. ( 12:19:00 )< command 8 >──────────────────────────────────────────────────────────{ counter: 0 }
  11. utop # let b = new test 1;;
  12. val b : test = <obj>
  13. ( 12:19:10 )< command 9 >──────────────────────────────────────────────────────────{ counter: 0 }
  14. utop # a = b;;
  15. - : bool = false
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement