<*> throws an exception if the first argument is not a higher-order function

[luminusian]

Currently,

((<*> + inc) 1)
CompilerException java.lang.ClassCastException: java.lang.Long cannot be cast to clojure.lang.IFn, compiling:

It can be worked around by calling <*> like this:

((<*> (m/curry 2 +) inc) 1)
=> 3

Here is an alternative implementation of -fapply for function-context in cats.builtin

    (-fapply [_ self av]
      (fn [x] (((m/curry 2 self) x) (av x))))

With this implementation,

((<*> + inc) 1)
=> 3

This implementation doesn't work if the first argument of <*> is a higher-order function.