Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Need cur to be defined at compile and run time.

  • Loading branch information...
commit 5f0f28a9df849099101d88f502e5b244fb5e9237 1 parent 51bb999
Jason authored
Showing with 5 additions and 4 deletions.
  1. +5 −4 combinators.el
View
9 combinators.el
@@ -7,10 +7,11 @@
(require 'cl)
-(defun cur (f &rest args)
- "Specialize a function on its first few arguments."
- (lambda (&rest more-args)
- (apply f (append args more-args))))
+(eval-and-compile
+ (defun cur (f &rest args)
+ "Specialize a function on its first few arguments."
+ (lambda (&rest more-args)
+ (apply f (append args more-args)))))
(defun comp (&rest funcs)
"Compose functions together. Function on the left
Please sign in to comment.
Something went wrong with that request. Please try again.