NEWT      Заведение таблицы

 SYSTEM NEWT
 SWAP   St

 <NEWT /St//Sp/>
                   где St - имя таблицы, Sp - размер таблицы

   Заводит таблицу с именем St размером Sp элементов. Имя таблицы должно
   быть описано в операторе SWAP.
   Размер таблицы задается в виде символа-целого числа.

   При возникновении ошибки в выходной поток stdout выводится сообщение:
      " ***  АВОСТ в процедуре NEWT"
   в следующей строке - причина ошибки:
      "Повторное заведение таблицы <имя таблицы>"
   если в программе уже была заведена таблица с таким-же именем;
      "Неверный формат обращения"
   если в программе имеется ящик с таким-же именем и в него произведена
   запись по WTR, или опущен размер таблицы;
      "Недопустимый размер таблицы <имя таблицы>"
   если размер заводимой таблицы равен нулю или больше 2730 элементов;
      "Нет памяти под таблицу <имя таблицы>"
   если нет достаточного количества свободной памяти для размещения таблицы.

   Значение:  Результатом замены является пустое выражение.

  -------------------------------- Пример ----------------------------------

         В таблице symtbl будет 1000 элементов, а в contbl - 256:
                        START
                        ENTRY task
                        SYSTEM NEWT,PROUT
                        SWAP symtbl,contbl

              task  =   <NEWT /symtbl//1000/>     +
                        <NEWT /contbl//256/>      +
                        <PROUT 'End of program'>
                        END

Seealso:


 CLTH  
 DLTH  
 PRTH  
 TSIZE