anchor.diff:     #:global-location-info
      #:function-info
      #:variable-info
  +   #:fdefinition
  +   #:fboundp
  +   #:fmakunbound
      ))
   
   (defpackage #:sicl-ast
  
positive.code:    #:lshift #:ashift
     #:& #:ior #:xor #:~
     #:== #:s< #:s<= #:u< #:u<=
     ))
  
  (defpackage #:sicl-procedure-integration
  
negative.code:    #:constant-ast #:make-constant-ast #:value
     #:call-ast #:make-call-ast #:callee-ast #:argument-asts
     #:block-ast #:make-block-ast #:body
     #:eval-when-ast #:make-eval-when-ast #:situations
     #:function-ast #:make-function-ast #:body-ast
     #:go-ast #:make-go-ast #:tag-ast
  