anchor.diff:  ;;;; clorb-poa.lisp -- Portable Object Adaptor
  -;; $Id: clorb-poa.lisp,v 1.28 2004/02/03 17:17:07 lenst Exp $
  +;; $Id: clorb-poa.lisp,v 1.29 2004/06/09 21:13:11 lenst Exp $
   
   (in-package :clorb)
   
  
positive.code: 
  (define-method destroy ((poa PortableServer:POA) etherealize-objects wait-for-completion)
  #|
   If wait_for_completion is TRUE and the current thread is in an invocation
  context dispatched from some POA belonging to the same ORB as this POA, the
  BAD_INV_ORDER system exception with standard minor code 3 is raised and
  POA destruction does not occur.
  
negative.code: that attempts to invoke operations on the POA receives the
  OBJECT_NOT_EXIST exception.
  
  * If the POA has an AdapterActivator installed, any requests that would
  have caused unknown_adapter to be called cause a TRANSIENT exception with
  standard minor code 4 to be raised instead.
  
  The wait_for_completion parameter is handled as follows:
  ...
  * If wait_for_completion is FALSE, the destroy operation destroys the POA and
  its children but waits neither for active requests to complete nor for etherealization
  to occur. If destroy is called multiple times before destruction is complete
  (because there are active requests), the etherealize_objects parameter applies
  