------------------------------------------------------------------------------
--                                                                          --
--                         GNAT RUN-TIME EXTENSIONS                         --
--                                                                          --
--                      X A D A . D I S P A T C H I N G                     --
--                                                                          --
--                                 S p e c                                  --
--                                                                          --
------------------------------------------------------------------------------

package XAda.Dispatching is
   pragma Pure (Dispatching);

   Dispatching_Policy_Error : exception;
end XAda.Dispatching;
