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.

История

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

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.

Реализация

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 (англ.)

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

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