Guest User

Untitled

a guest
Jun 18th, 2018
57
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.28 KB | None | 0 0
  1. (defprotocol Foo
  2. (bar [this]))
  3.  
  4. (extend-type (Class/forName "[Ljava.lang.String;")
  5. Foo
  6. (bar [this] (seq this)))
  7.  
  8. (bar (into-array ["a" "b"]))
  9.  
  10. (extend-type (Class/forName "[[Ljava.lang.Object;")
  11. Foo
  12. (bar [this] (seq (map seq this))))
  13.  
  14. (bar (to-array-2d [["a" "b"]["c" "d"]]))
Add Comment
Please, Sign In to add comment