anchor.diff:      buffer))
   
   
  +
   (defmethod get-normal-response ((req server-request))
     (get-request-response req :no_exception))
   
  
positive.code:    (reply-status          :initform nil       :accessor reply-status)
     (reply-buffer          :initform nil       :accessor reply-buffer)))
  
  
  (defmethod create-server-request ((orb clorb-orb) &rest initargs)
    (apply #'make-instance 'server-request 
           :the-orb orb initargs))
  
  
  
negative.code: ;;;; clorb-servant.lisp
  ;; $Id: clorb-servant.lisp,v 1.17 2004/06/09 21:14:44 lenst Exp $
  
  (in-package :clorb)
  
  