anchor.diff:    ((name :string)
      (fh netobj)
      (oh netobj)
  -   (svid :int32)
  +   (uppid :int32)
      (offset :uint64)
      (len :uint64)))
   
  
positive.code: (defconstant +nlm4-program+ 100021)
  (defconstant +nlm4-version+ 4)
  
  (use-rpc-program +nlm4-program+ +nlm4-version+)
  
  (defxenum nlm4-stats 
  
negative.code:    (:fbig 8)
     (:failed 9)))
  
  (defxstruct nlm4-res ()
    ((cookie netobj)
     (stat nlm4-stats)))
  
  (defxstruct nlm4-holder ()
    ((exclusive :boolean)
     (svid :int32)
  