Всем привет ,
type String is array (Positive range <>) of Character;
Хорошо, но где предел, когда мы объявляем переменную?
Когда мы делаем это:
max_String : String( 1 .. integer'last ) ;
Это не удалось .
Например :
With Ada.Text_IO ; Use Ada.Text_IO ;
Procedure fixed is
max_String : String( 1 .. integer'last ) ;
begin
get ( max_String ) ;
put ( max_String ) ;
End fixed ;
Компилятор: "fixed.adb:3:1: ошибка: общий размер локальных объектов слишком велик"
Спасибо.
max_String : access String := new String(1 .. integer'last);
, чтобы разместить строку в куче. - person user_1818839   schedule 15.01.2016