misc-extensions

Regarding the code, its ok although there are some parts that are unnecessarily messy. Here[0], and in other parts you use labels in the middle the function. It is best to do in the outer level form. I like the rlabels of misc-extension[1] when using local functions but I understand most people would prefer not to add 'util' dependencies. Another thing in that function. The (let ((data (or ...)))) is unnecessary. You place the form in the default case of the keyword argument So it would end up looking like: (defun x-find-color (rgba &key (x 0) (y 0) (width default-width) (height default-height) (test #'equal) (snap-data (x-snapshot :x x :y y :width width :height height))) ...) Also if not using asdf, the quickload form should be wra

I'm still using a couple of Lisp macros I wrote in 1980 [0]. I think a few other people are using them too. I've improved them a little since then, but the basic concept is unchanged. [0] https://github.com/slburson/misc-extensions -- specifically 'gmap' and 'new-let'

So, that thing I mentioned yesterday that I wrote 35 years ago? It might interest you: https://github.com/slburson/misc-extensions Look in src/gmap.lisp. I admit it wouldn't work that well for 'n-at-a-time', but here's a closely related example: (defun alist-to-plist (alist) (gmap :plist nil (:alist alist))) There are some idiosyncrasies here: 'nil' is shorthand for the identity function (in this case, the two-argument, two-value identity function), and the use of keyword symbols is weird and potentially problematic, though I've never run into a problem with it in practice. This is the map-reduce model of iteration -- obviously not with support for distributed computation, but nonetheless useful for programming in the small. And far more elegant, to my eyes, than that LOOP monstrosity :-)