/usr/share/ada/adainclude/asis/asis-exceptions.ads is in libasis2017-dev 2017-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 | ------------------------------------------------------------------------------
-- --
-- ASIS-for-GNAT INTERFACE COMPONENTS --
-- --
-- A S I S . E X C E P T I O N S --
-- --
-- S p e c --
-- --
-- This specification is adapted from the Ada Semantic Interface --
-- Specification Standard (ISO/IEC 15291) for use with GNAT. In accordance --
-- with the copyright of that document, you can freely copy and modify this --
-- specification, provided that if you redistribute a modified version, any --
-- changes that you have made are clearly indicated. --
-- --
------------------------------------------------------------------------------
------------------------------------------------------------------------------
-- 5 package Asis.Exceptions
------------------------------------------------------------------------------
------------------------------------------------------------------------------
package Asis.Exceptions is
------------------------------------------------------------------------------
------------------------------------------------------------------------------
-- ASIS exceptions are:
ASIS_Inappropriate_Context : exception;
------------------------------------------------------------------------------
-- Raised when ASIS is passed a Context value that is not appropriate for the
-- operation. This exception will typically indicate that a user error
-- has occurred within the application.
------------------------------------------------------------------------------
ASIS_Inappropriate_Container : exception;
------------------------------------------------------------------------------
-- Raised when ASIS is passed a Container value that is not appropriate for
-- the operation. This exception will typically indicate that a user error
-- has occurred within the application.
------------------------------------------------------------------------------
ASIS_Inappropriate_Compilation_Unit : exception;
------------------------------------------------------------------------------
-- Raised when ASIS is passed a Compilation_Unit value that is not
-- appropriate. This exception will typically indicate that a user
-- error has occurred within the application.
------------------------------------------------------------------------------
ASIS_Inappropriate_Element : exception;
------------------------------------------------------------------------------
-- Raised when ASIS is given an Element value that is not appropriate. This
-- exception will typically indicate that a user error has occurred within
-- the application.
------------------------------------------------------------------------------
ASIS_Inappropriate_Line : exception;
------------------------------------------------------------------------------
-- Raised when ASIS is given a Line value that is not appropriate.
------------------------------------------------------------------------------
ASIS_Inappropriate_Line_Number : exception;
------------------------------------------------------------------------------
-- Raised when ASIS is given a Line_Number value that is not appropriate.
-- This exception will typically indicate that a user error has occurred
-- within the application.
------------------------------------------------------------------------------
ASIS_Failed : exception;
------------------------------------------------------------------------------
-- This is a catch-all exception that may be raised for different reasons
-- in different ASIS implementations. All ASIS routines may raise ASIS_Failed
-- whenever they cannot normally complete their operation. This exception
-- will typically indicate a failure of the underlying ASIS implementation.
------------------------------------------------------------------------------
end Asis.Exceptions;
|