anchor.diff:  ;;;;; assignments to temporary variables.
   
   (defvar *expex-funinfo* nil)
  +(defvar *expex-warn?* nil)
   
   ;;;; CONFIGURATION
   
  
positive.code: (defun expex-stack-locals? (ex)
    (and *expex-funinfo* ; Is set if we're inside a function.
  	   (transpiler-stack-locals? (expex-transpiler ex))))
  
  ;;;; PREDICATES
  
  
negative.code: 
  ;; Expand arguments to function.
  (defun expex-argexpand-0 (ex fun args)
    (dolist (i args)
  	(expex-warn i))
    (funcall (expex-function-collector ex) fun args)
    (let argdef (funcall (expex-function-arguments ex) fun)
  	(if (eq argdef 'builtin)
  