CL-FUNCTIONAL

CL-FUNCTIONAL is a Common Lisp library under the Simplified BSD License, dedicated to give some functiona like macros, and functions, but without any purity.

You can find the documentation in the souce code. And practica examples in the testing t directory.

What gives to you?

utils.lisp

ifte: A more conventional if then else, found in conventional languages.
if-not
lazy,with-lazy,lazy-force, lazy-make, lazyp and lazy-force: Bringin to you some lazy functions
/>, //>: foward pipelining
</, <//: backward pipelining
memoize: generate a morization function from an existing one
comp-case: case with a custom function
let-when

data-structures

It aims to simplify the data structures manipulation

mk# and mk#!, for hash-table creation and modification, that allows simple creation of hash tables.

tco.lisp

Provides tail call optimization, via transformation a lambda function with a recusive tail call to a iterative loop.

(defun my+ (&rest args)
      (let ((fcall (lambda-tail (x remainding)
                                (if (not remainding) x
                                    (tail-call (+ x (first remainding))
                                               (rest remainding))))))
        (funcall fcall 0 args)))

packages.lisp

Sometimes is very hard to write the full name of a package, for example:

(hunchentoot:define-easy-handler x ()
    (setf hunchentoot:request* ..))

After some writing you get a lot of package noise, for that reason here you have a nice macro called define-nicknames, that adds nicknames to a package:

(define-nicknames
    (:hunchentoot :ht)
    (:other-package :op))

With that you can use ht: and op: like the original package. For example: