Francesco Petrogalli wrote: > Thank you very much! > > > > 2009/3/8 Mikael Jansson <[email protected]>: >>> (subsetp (list 'free) *stato*) ==> T >>> >>> (subsetp (list 'free (on 'A 'B)) *stato*) ==> nil >>> >> Your function ON returns a fresh list each time. >> >> Try (subsetp (list 'free (on 'A 'B)) *stato* :test #'equalp) >> Sorry, that was the incorrect answer, but it happened to do the right thing. :)
EQUAL would in fact suffice, as it does checks the items for structural equality which is what you want. EQUALP is "slopier" than EQUALP. I don't know what the default :TEST function is, but I'm assuming EQL. See http://l1sp.org/cl/equal and http://l1sp.org/cl/equalp - Mikael _______________________________________________ Gardeners mailing list [email protected] http://www.lispniks.com/mailman/listinfo/gardeners
