Permalink
Browse files

Need cur to be defined at compile and run time.

  • Loading branch information...
1 parent 51bb999 commit 5f0f28a9df849099101d88f502e5b244fb5e9237 Jason committed Oct 13, 2012
Showing with 5 additions and 4 deletions.
  1. +5 −4 combinators.el
View
@@ -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

0 comments on commit 5f0f28a

Please sign in to comment.