Ада-95. Компилятор GNAT
Переименование исключений
В некоторых случаях полезно осуществить локальное переименование исключения:
| with Ada.IO_Exceptions;
package My_IO is Data_Error: exception renames Ada.IO_Exceptions.Data_Error; . . . end My_IO; |
В некоторых случаях полезно осуществить локальное переименование исключения:
| with Ada.IO_Exceptions;
package My_IO is Data_Error: exception renames Ada.IO_Exceptions.Data_Error; . . . end My_IO; |