EMPTY-BUFFERS

EMPTY-BUFFERS (очистить буферы, опустошить буфера) — стандартное слово Каллисто.

EMPTY−BUFFERS  ( −− )                               Очистить буфер, независимо от содержания. Ничего на диск не записывать.

Буфер отмечается как пустой, независимо от содержания. Обновлённый блок на диск не записывается.

Ввод слова EMPTY-BUFFERS

В режиме ЛАТ последовательно нажмите клавиши  ИП   ÷   6   2    ,      P   −     Р-ГРД-Г   В/О   3   П   П   ИП   ×   1 

EMPTY-BUFFERS в стандарте ANS Forth

 7.6.2.1330   EMPTY-BUFFERS                                            BLOCK EXT
            ( -- )
            Освобождает все блочные буферы. Не перемещает содержание никакого 
            модифицированного блочного буфера на запоминающее устройство.

        См.: 7.6.1.0800 BLOCK.

История

EMPTY-BUFFERS в предыдущем стандарте Forth-83 (англ.)

     EMPTY-BUFFERS --                           M,79   "empty-buffers"
          Unassign all block buffers.  UPDATEed blocks are not written
          to mass storage.  See:  BLOCK

EMPTY-BUFFERS в стандарте Forth-79 (англ.)

EMPTY-BUFFERS                                145
    Mark all block buffers as empty, without necessarily affecting
    their actual contents.  UPDATEd blocks are not written to mass
    storage.

EMPTY-BUFFERS в fig-FORTH Release 1 glossary, май 1979 (англ.)

EMPTY-BUFFERS                                L0
       Mark all block-buffers as empty, not necessarily affecting the
       contents.
       Updated blocks are not written to the disc. This is also an
       initialization proceedure before first use of the disc.

Реализация

Для совместимости с Фортом английское слово buffer (рус. буфер) в имени EMPTY-BUFFERS по-прежнему используется во множественном числе, хотя в Каллисто буфер всего один.

3455 ;#EMPTY−BUFFERS
3456 ; EMPTY−BUFFERS    ( −− )                               Очистить буфер, независимо от содержания. Ничего на диск не записывать.
3457 ; Отметить буфер как пустой, независимо от содержания. Обновлённый блок на диск не записывается.
3458 LMTBUF:         .DB     13
3459                 .TEXT   "EMPTY−BUFFERS"
3460                 .DW     LABORT
3461 MTBUF:          .DW CALL
3462 RMTBUF:         .DW BUFN, LITP,3074, ERASE, EXIT

Советская реализация

Юрий Семёнов приводит следующее описание слова EMPTY-BUFFERS (стр. 54) через отсутствующее в Каллисто слово FIRST:

: EMPTY-BUFFERS   FIRST @ 3084 ERASE ;

Описание и определение слова EMPTY-BUFFERS в ядре ФОРТ-ЕС:

EMPTY-BUFFERS + -> ОЧИСТИТЬ БУФЕРНЫЙ ПУЛ                        25

                     Экран номер 25
( 31.03.86    +BUF  BUFFER  BLOCK  EMPTY-BUFFERS  UPDATE   )

: EMPTY-BUFFERS ( -> ) FIRST LIMIT OVER - ERASE ;

Определение слова EMPTY-BUFFERS в FORTH ИТЭФ:

             HEAD    215Q,'EMPTY-BUFFER',323Q,HTBUF,$COL  ;EMPTY-BUFF
             DW  FIRST,AT,LIT,3084,ERASE,SEMI

Ссылки

• Исходный текст слова EMPTY-BUFFERS в Каллисто Классик 1.0
• См. слова SAVE-BUFFERS, UPDATE и FLUSH
• Слово EMPTY-BUFFERS в стандарте ANS Forth (англ.)
• Слово EMPTY-BUFFERS в черновике Forth 200x (англ.)
• ВВОД-ВЫВОД в книге Л.Броуди «Начальный курс программирования на языке Форт»
• The Editor (and Staff) в книге Leo Brodie Starting Forth (англ.)

У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их.

Это заготовка статьи. Вы можете помочь проекту, дополнив её.