anchor.diff:  
   (def-type-method writer-function ())
   (def-type-method reader-function ())
  +(def-type-method weak-reader-function ())
   (def-type-method destroy-function ())
   
   (def-type-method unbound-value ()
  
positive.code: ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
  ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  
  ;; $Id: ffi.lisp,v 1.21 2005-09-26 21:27:31 espen Exp $
  
  (in-package "GLIB")
  
  
negative.code: 
  (defmethod copy-from-alien-function  ((type t) &rest args)
    (apply #'from-alien-function type args))
  
  (defmethod weak-reader-function ((type symbol) &rest args)
    (apply #'reader-function type args))
  
  
  (defmethod alien-type ((type (eql 'signed-byte)) &rest args)
  