Skip to content

Instantly share code, notes, and snippets.

@mybuddymichael

mybuddymichael/alts!!-annotation.clj Secret

Created October 3, 2013 17:53
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mybuddymichael/b209294b52171c875a01 to your computer and use it in GitHub Desktop.
Save mybuddymichael/b209294b52171c875a01 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
alts!!-annotation.clj
(ann ^:no-check clojure.core.async/alts!!
(All [x d]
(Fn [(Seqable (U (Port x) '[(Port x) x])) (Seqable (Port x)) & :mandatory {:default d} :optional {:priority (U nil true)} ->
(U '[d ':default] '[nil (Port x)] '[x (Port x)])]
[(Seqable (U (Port x) '[(Port x) x])) & :optional {:priority (U nil true)} -> '[(U x nil) (Port x)]])))
@mybuddymichael
Copy link
Author

See the updated return types.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment