------------------------------------------------------------------ -- -- NAME: ERROR_HANDLING - SPECIFICATION -- DISCREPANCY REPORTS: ------------------------------------------------------------------ -- file: error_handling.ada -- level: 0a, 1a, 2a, 0b, 1b, 2b, 0c, 1c, 2c with GKS_TYPES; use GKS_TYPES; procedure ERROR_HANDLING (ERROR_INDICATOR : in ERROR_NUMBER; GKS_FUNCTION : in STRING; ERROR_FILE : in STRING := DEFAULT_ERROR_FILE);