Macro Push-Last

Part of:

package fset
( push-last place val &environment env )
(push-last seq val) --> (setf seq (with-last seq val))