anchor.diff:    (if (eq s (second x.))
         x
         `(,x.
  -	    (%setq ,s ,(second x.)))))
  +	    ,(expex-guest-filter-setter ex `(%setq ,s ,(second x.))))))
   
   ;; Make return-value assignment of last expression in body.
   (defun expex-make-return-value (ex x s)
  
positive.code: 		(append (butlast x)
  				(if (%setq? last.)
  					(expex-make-setq-copy ex last s)
  				    `((%setq ,s ,@(or last
  									  '(nil))))))
  		x)))
  
  ;; Expand VM-SCOPE body and have the return value of the last expression
  
negative.code:       (cons (append `((%var ,s))
  					moved
  		    		(if (expex-returnable? ex new-expr.)
  		        		(list (expex-guest-filter-setter ex
  								  `(%setq ,s ,@new-expr)))
  			    		new-expr))
    	        s)))
  
  