-- package TPARSE is --+---------------------------------------------------------------------- -- -- Unit Type : PACKAGE -- Unit Name : TPARSE -- Version : V01.00 -- -- Author : Stephen R. Rainier Date : 04/02/85 -- -- Purpose : To allow insertion of the TPARSE FSM into the Ada library. -- -- -- Parameters : None. -- -- -- -- Modifications : -- -- Name Date Description of Change -- ---- ---- --------------------- -- -- -- Packages "WITH"ed : None. -- -- -- Procedure/Function "CALL"s : STATE_TABLE, KEY_TABLE -- -- -- Exceptions : -- -- Name Handled/Raised Description -- ---- -------------- ----------- -- -- -- -- Side Effects : -- -- -- Comments : -- --%---------------------------------------------------------------------- -- -- Declarations -- procedure STATE_TABLE; pragma interface(MACRO, STATE_TABLE); pragma import_procedure(STATE_TABLE); procedure KEY_TABLE; pragma interface(MACRO, KEY_TABLE); pragma import_procedure(KEY_TABLE); end TPARSE;