anchor.diff:  
   (defvar *gcc* "/usr/bin/gcc")
   
  -(defvar *gcc-options* '(#-darwin "-shared"
  -			#+darwin "-bundle"
  -			"-fPIC"))
  +(defvar *gcc-options* '(#-(or darwin macosx) "-shared"
  +			#+(or darwin macosx)  "-dynamic"
  +			#+(or darwin macosx)  "-arch"
  +			#+(or darwin macosx)  "x86_64"
  +			#+(or darwin macosx)  "-arch"
  +			#+(or darwin macosx)  "i386"
  +			#+(or darwin macosx)  "-bundle"
  +			#+(or darwin macosx)  "/usr/lib/bundle1.o"
  +			#+(or darwin macosx)  "-flat_namespace"
  +			#+(or darwin macosx)  "-undefined"
  +			#+(or darwin macosx)  "suppress"
  +			#-(or darwin macosx) "-fPIC"))
   
   ;;; Separate class so that we don't mess up other packages
   (defclass uffi-c-source-file (c-source-file) ())
   
   (defmethod output-files ((o compile-op) (c uffi-c-source-file))
     (list (make-pathname :name (component-name c)
  -		       :type "so"
  +		       :type #-(or darwin macosx) "so" #+(or darwin macosx) "dylib"
   		       :defaults (component-pathname c))))
   
   (defmethod perform ((o load-op) (c uffi-c-source-file))
  
positive.code: ;; Copyright (c) 2003 Nikodemus Siivola
  ;; 
  ;; Permission is hereby granted, free of charge, to any person obtaining
  ;; a copy of this software and associated documentation files (the
  ;; "Software"), to deal in the Software without restriction, including
  
negative.code: ;; distribute, sublicense, and/or sell copies of the Software, and to
  ;; permit persons to whom the Software is furnished to do so, subject to
  ;; the following conditions:
  ;;
  ;; The above copyright notice and this permission notice shall be included
  ;; in all copies or substantial portions of the Software.
  ;;
  ;; THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  ;; EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  ;; MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
  