The (STRUCTURE ...) pattern assumes that the predicate for a struct with conc-name FOO will be FOOP instead of FOO-P. It does this with accessors, too.
(defstruct foo a b c)
(optima:match (make-foo)
((structure foo a b c) t))
This looks for predicate FOOP and readers FOOA, FOOB, and FOOC when it should look for predicate FOO-P and readers FOO-A, FOO-B, and FOO-C.
The
(STRUCTURE ...)
pattern assumes that the predicate for a struct with conc-nameFOO
will beFOOP
instead ofFOO-P
. It does this with accessors, too.This looks for predicate
FOOP
and readersFOOA
,FOOB
, andFOOC
when it should look for predicateFOO-P
and readersFOO-A
,FOO-B
, andFOO-C
.