Skip to content

Commit

Permalink
Revert "Added apply macro"
Browse files Browse the repository at this point in the history
This reverts commit fb938cb.
  • Loading branch information
Yarin Heffes committed Sep 13, 2024
1 parent fb938cb commit 5edf0bf
Show file tree
Hide file tree
Showing 2 changed files with 0 additions and 14 deletions.
13 changes: 0 additions & 13 deletions src/language-macros.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -113,19 +113,6 @@ to
(cl:assert (cl:<= 2 (cl:list-length items)))
`(nest ,@(cl:reverse items)))

(cl:defmacro apply (cl:&rest items)
"A syntactic convenience for function application. Transform
(APPLY w x y z)
to
(fn (f) (f w x y z))."

(alexandria:with-gensyms (f)
`(fn (,f)
(,f ,@items))))

(cl:defmacro .< (cl:&rest items)
"Right associative compose operator. Creates a new functions that will run the
functions right to left when applied. This is the same as the NEST macro without supplying
Expand Down
1 change: 0 additions & 1 deletion src/package.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -92,7 +92,6 @@
#:unwrap-as
#:nest
#:pipe
#:apply
#:.<
#:.>
#:make-list
Expand Down

0 comments on commit 5edf0bf

Please sign in to comment.