anchor.diff:          (go start)))))
   
   (defun map (func &rest lists)
  -  (%map func lists))
  +  (%map func lists)
  +  nil)
   
   (defun mapcar (func &rest lists)
     "Calls function for all head CARs in lists. Then call with next elements.
  
positive.code: ;;;; nix operating system project
  ;;;; list processor environment
  ;;;; Copyright (C) 2005-2007 Sven Klose <pixel@copei.de>
  ;;;;
  ;;;; List traversal
  
  
negative.code:           (go ,starttag)
            ,endtag
            (return (progn ,@result)))))))
  