diff --git a/ansi-tests/random-int-form.lsp b/ansi-tests/random-int-form.lsp index d3f76781a48c0c27fbc2589c997106e09f1d4e38..50e3178c7db01e47001e737d4411706806443905 100644 --- a/ansi-tests/random-int-form.lsp +++ b/ansi-tests/random-int-form.lsp @@ -2151,7 +2151,7 @@ #'(lambda (form) (and (consp form) (or - (and (member (car form) '(setq setf shiftf) :test #'eq) + (and (member (car form) '(setq setf shiftf incf decf) :test #'eq) (eq (cadr form) var)) (and (eql (car form) 'multiple-value-setq) (member var (cadr form))))))