compile error on high safety settings (in sbcl)

[bymoz089]

In sbcl, with high safety settings (sb-ext:restrict-compiler-policy 'safety 3 3), then (ql:quickload "smackjack-demo") fails to load and run the demo, with error message:

unknown type specifier: '(MEMBER :POST :GET)
   [Condition of type SIMPLE-ERROR]

The problematic :type specifiers are in file smackjack.lisp in (defclass ajax-function...:

on line 25

    :type '(member :post :get)

and also on line 31:

    :type '(member :request-object :response-xml :response-text

Removing both quotes before (member ..., would fix the issue.

[aarvid]

will look at this soon