Ада-95. Компилятор GNAT


         

Переименование исключений


В некоторых случаях полезно осуществить локальное переименование исключения:

with Ada.IO_Exceptions;

package My_IO is

Data_Error: exception renames Ada.IO_Exceptions.Data_Error; . . . end My_IO;



Содержание  Назад  Вперед