Skip to content

Instantly share code, notes, and snippets.

@KirinDave
Created December 31, 2009 20:24
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 KirinDave/91d213ba84940cf0fdfe to your computer and use it in GitHub Desktop.
Save KirinDave/91d213ba84940cf0fdfe to your computer and use it in GitHub Desktop.
(def #^{:arglists '([winner loser] [winner loser date])} make-game!
(fn make-game! [& args]
(let [game (apply new-game args)]
(dosync
(commute (:games *league*) conj game)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment