   ([ctx v] (p/pure ctx v)))
 
 (defn return
-  "This is a monad version of pure and it works
+  "This is a monad version of `pure` and works
   identically to it."
   ([v] (return (ctx/get-current) v))
   ([ctx v] (p/mreturn ctx v)))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(def <$>
  "A Haskell-style fmap alias."
  fmap)

(def <*>
  "A Haskell-style fapply alias."
  fapply)

(defn >>=

        ~@body)))

(defn get-current-context
  "Alias to `cats.context/get-current` for backward compatibility."
  {:deprecated true}
  ([] (ctx/get-current nil))
  ([default] (ctx/get-current default)))
