anchor.diff:   (struct freetype::memory-rec- (freetype:user (* t)) (freetype:alloc freetype:alloc-func) (freetype:free freetype:free-func)
     (freetype:realloc freetype:realloc-func)))
   
  -(define-alien-type freetype:stream-desc (union freetype::stream-desc- (freetype:value (signed 32)) (freetype:pointer (* t))))
  +(define-alien-type freetype:stream-desc 
  +    (union freetype::stream-desc- 
  +      (freetype:value long) 
  +      (freetype:pointer (* t))))
   
   (define-alien-type freetype:stream-io (* t))
   
  
positive.code:             (freetype:cursor (* (unsigned 8)))
              (freetype:limit (* (unsigned 8)))))
  
  (define-alien-type freetype:pos (signed 32))
  
  (define-alien-type freetype:vector (struct freetype::vector- (freetype:x freetype:pos) (freetype:y freetype:pos)))
  
  
negative.code: (define-alien-type freetype:fast (signed 32))
  
  (define-alien-type freetype:ufast (unsigned 32))
  
  (define-alien-type freetype:ptrdiff-t (signed 32))
  
  (define-alien-type freetype:size-t (unsigned 32))
  
  (define-alien-type freetype:wchar-t (signed 32))
  
  (define-alien-type freetype:wint-t (unsigned 32))
  
  (define-alien-type freetype:bool (unsigned 8))
  
  (define-alien-type freetype:fword (signed 16))
  
  (define-alien-type freetype:ufword (unsigned 16))
  
  (define-alien-type freetype:char (signed 8))
  
  (define-alien-type freetype:byte (unsigned 8))
  
  (define-alien-type freetype:string (signed 8))
  
  (define-alien-type freetype:short (signed 16))
  
  (define-alien-type freetype:ushort (unsigned 16))
  
  (define-alien-type freetype:int (signed 32))
  
  (define-alien-type freetype:uint (unsigned 32))
  
  (define-alien-type freetype:long long)
  
  (define-alien-type freetype:ulong unsigned-long)
  
  (define-alien-type freetype:f2dot14 (signed 16))
  
  (define-alien-type freetype:f26dot6 long)
  
  (define-alien-type freetype:fixed long)
  
  (define-alien-type freetype:error (signed 32))
  
  (define-alien-type freetype:pointer (* t))
  
  (define-alien-type freetype:offset freetype:size-t)
  
  (define-alien-type freetype:ptr-dist freetype:size-t)
  
  (define-alien-type nil
   (enum nil (:mod-err-base #.#x000) (:mod-err-autohint #.#x100) (:mod-err-cache #.#x200) (:mod-err-cff #.#x300)
  