fare-quasiquote
fare-quasiquote is a portable quasiquote implementation that plays well with pattern-matching

You probably want to :depend-on (:fare-quasiquote-extras), which enables the named-readtable :fare-quasiquote and hooks for pattern-matching with Optima.

Then in your file, you would

(defpackage ... (:use :optima) ...)

(in-package ...)

(in-readtable :fare-quasiquote)

... (match (`(foo ,@bar) ...) ...)

Note that ,@ probably only works well with pattern-matching when in final position, and that the pedantically correct syntax is `(foo . ,bar) whereas the former in a strict reading of the standard is required to (append ... nil) which optima won't recognize.

As of 0.9.10 it has a pretty good test suite, which makes it competitive in robustness and correctness with other implementations, and a decent pretty-printer; and tends to do more simplifications than competing implementations, which can be a good or a bad thing depending on who you ask.

fare-quasiquote is written by Fare Rideau.

git clone git://common-lisp.net/users/frideau/fare-quasiquote.git