Skip to content

Instantly share code, notes, and snippets.

@rm-hull
Last active December 24, 2015 14:19
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 rm-hull/6812140 to your computer and use it in GitHub Desktop.
Save rm-hull/6812140 to your computer and use it in GitHub Desktop.
(ns typed-play.core
(:require-macros [clojure.core.typed :as ct])
(:require [clojure.core.typed :as ct]))
(ct/ann my-identity (All [x] (Fn [x -> x])))
(defn my-identity [x]
(if (number? x)
(inc x)
x))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment