anchor.diff:  ;;; File Descriptors
   ;;;-------------------------------------------------------------------------
   
  -(defsyscall ("close" %sys-close) :int
  +(defsyscall (%sys-close "close") :int
     "Close an open file descriptor."
     (fd :int))
   
  -(defsyscall ("dup" %sys-dup) :int
  +(defsyscall (%sys-dup "dup") :int
     (fildes :int))
   
  -(defsyscall* ("dup2" %sys-dup2) :int
  +(defsyscall* (%sys-dup2 "dup2") :int
     (fildes1 :int)
     (fildes2 :int))
   
  -(defsyscall* ("ioctl" %sys-ioctl/2) :int
  +(defsyscall* (%sys-ioctl/2 "ioctl") :int
     (fd      :int)
     (request :int))
   
  -(defsyscall* ("ioctl" %sys-ioctl/3) :int
  +(defsyscall* (%sys-ioctl/3 "ioctl") :int
    (fd      :int)
    (request :int)
    (arg     :pointer))
  
positive.code: (defentrypoint %sys-bzero (buffer length)
    (%sys-memset buffer 0 length))
  
  (defcfun* ("memcpy" %sys-memcpy) :pointer
    (dest   :pointer)
    (src    :pointer)
    (length size-t))
  
  (defcfun* ("memmove" %sys-memmove) :pointer
    (dest   :pointer)
    (src    :pointer)
    (length size-t))
  
negative.code:   (with-foreign-pointer-as-string ((cstr size) 256)
      (%%sys-getdomainname cstr size)))
  
  (defsyscall (%%sys-uname "uname") :int
    (buf :pointer))
  
  (defentrypoint %sys-uname ()
  