Skip to content

Instantly share code, notes, and snippets.

@frenchy64

frenchy64/seq_type_matching.clj

Created July 28, 2011 16:14
Show Gist options
  • Star 1 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save frenchy64/1111842 to your computer and use it in GitHub Desktop.
Save frenchy64/1111842 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
seq_type_matching.clj
match.test.core=> (-> (build-matrix [x]
[[1]] 1
[(isa? Object)] 2)
compile
to-clj)
(clojure.core/cond
(<TypePattern: class java.lang.Object > x) 2
(#match.core.VectorPattern[[1], 0] x) (clojure.core/cond
(<LiteralPattern: 1> x0) (clojure.core/cond
(<LiteralPattern: nil> x1) 1
(<WildcardPattern: > x1) (throw (java.lang.Exception. "Found FailNode")))
(<WildcardPattern: > x0) (throw (java.lang.Exception. "Found FailNode")))
(<WildcardPattern: > x) (throw (java.lang.Exception. "Found FailNode")))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment