Advertisement
Guest User

Untitled

a guest
Apr 17th, 2014
48
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.26 KB | None | 0 0
  1. (defrecord Record [^bytes field])
  2. (def rec1 (->Record (byte-array (map byte "abc"))))
  3. (def rec2 (->Record (byte-array (map byte "abc"))))
  4.  
  5. (= rec1 rec2)
  6. ; => false
  7.  
  8. (defrecord Record [^bytes field])
  9. Object
  10. (equals [this other] (Arrays/equals this other)))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement