Справочник по Ada 2005
A.10.4 Указание длины строки и страницы
Статическая семантика
Подпрограммы, описанные в этом подпункте, связаны со структурой строк и страниц файла в режиме Out_File или Append_File. Они работают либо с файлом, заданным в качестве первого параметра, либо, при отсутствии такого параметра, с текущим файлом вывода по умолчанию. Они обеспечивают вывод текста с заданной максимальной длиной строки или страницы. В этих случаях разделители строк и страниц выводятся неявно и автоматически при необходимости. Когда длина строки и страницы неограничена (то есть, когда они имеют стандартное значение ноль), как в случае с новым открытым файлом, новые строки и новые страницы начинаются только при явном вызове.
Во всех случаях исключение Status_Error распространяется, если используемый файл не открыт; исключение Mode_Error распространяется, если режим файла не Out_File или Append_File.
procedure Set_Line_Length(File : in File_Type; To : in Count);
procedure Set_Line_Length(To : in Count);
procedure Set_Line_Length(To : in Count);
Устанавливает максимальную длину строки указанного файла вывода или добавления до числа символов, указанных To. Значение ноль для To задает неограниченную длину строки.
Исключение Use_Error распространяется, если заданная длина строки не подходит для связанного внешнего файла.
procedure Set_Page_Length(File : in File_Type; To : in Count);
procedure Set_Page_Length(To : in Count);
procedure Set_Page_Length(To : in Count);
Устанавливает максимальную длину страницы указанного файла вывода или добавления до числа строк, указанных To. Значение ноль для To задает неограниченную длину страницы.
Исключение Use_Error распространяется, если заданная длина страницы не подходит для связанного внешнего файла.
function Line_Length(File : in File_Type) return Count;
function Line_Length return Count;
function Line_Length return Count;
Возвращает максимальную длину строки, которая в данный момент установлена для указанного файла вывода или добавления, или ноль, если длина строки неограничена.
function Page_Length(File : in File_Type) return Count;
function Page_Length return Count;
function Page_Length return Count;
Возвращает максимальную длину страницы, которая в данный момент установлена для указанного файла вывода или добавления, или ноль, если длина страницы неограничена.
