anchor.diff:  
   (define-standard-compiler-method c-preprocess (c-compiler)
     ("-E~*" T)
  -  ("-Wp~{,~a~}" options))
  +  ("-Wp~{,~a~}" preprocessor))
   
   (defgeneric c-assemble (c-compiler from to &key &allow-other-keys)
     (:method (compiler from to &rest args)
  
positive.code: 
  (define-standard-compiler-method c-link (c-compiler)
    ("-shared~*" shared)
    ("-Wl~{,~a~}" options))
  
  (defgeneric c-compile (c-compiler from to &key &allow-other-keys)
    (:method (compiler from to &rest args)
  
negative.code: 
  (define-standard-compiler-method c-assemble (c-compiler)
    ("-c~*" T)
    ("-Wa~{,~a~}" assembler))
  
  (defgeneric c-link (c-compiler from to &key &allow-other-keys)
    (:method (compiler from to &rest args)
  