Defsetf Lambda-Lists Don't Permit the &environment Parameter

[Shinmera]

This is in violation to 3.4.7 which specifically allows the &environment parameter in defsetf lambda-lists.

Test case:

(defsetf foo (&environment env place) (value))
;; => &ENVIRONMENT is only valid at top level of lambda list.

I'm not entirely sure if 3.4.7 requires &environment to come after the places, unlike other lambda-lists where &environment has to be first. In any case, late &environment also fails in the same fashion.

(defsetf foo (place &environment env) (value))
;; => &ENVIRONMENT is only valid at top level of lambda list.

[easye]

c.f urn:abcl.org/trac:459 https://abcl.org/trac/ticket/459

EDIT: corrected abcl.org/trac/ticket correspondence. Thanks @Shinmera