SAVE-BUFFERS
SAVE-BUFFERS (сохранить буферы) — стандартное слово Каллисто.
SAVE−BUFFERS ( −− ) Если установлен флаг UPDATE, сбросить блок на диск.
Если находящийся в буфере экран был изменён, скидывает его на диск. Буфер остаётся распределённым.
Ввод слова SAVE-BUFFERS
В режиме ЛАТ последовательно нажмите клавиши 1 ШГ← ↔ ИП P − Р-ГРД-Г В/О 3 П П ИП × 1
SAVE-BUFFERS в стандарте ANS Forth
7.6.1.2180 SAVE-BUFFERS BLOCK ( -- ) Перемещает содержание каждого модифицированного блочного буфера на запоминающее устройство. Отмечает все буферы как не модифицированные.
История
Для совместимости с Фортом английское слово buffer (рус. буфер) в имени SAVE-BUFFERS по-прежнему используется во множественном числе, хотя в Каллисто буфер всего один.
SAVE-BUFFERS в предыдущем стандарте Forth-83 (англ.)
SAVE-BUFFERS -- M,79 "save-buffers" The contents of all block buffers marked as UPDATEed are written to their corresponding mass storage blocks. All buffers are marked as no longer being modified, but may remain assigned.
SAVE-BUFFERS в стандарте Forth-79 (англ.)
SAVE-BUFFERS 221 Write all blocks to mass-storage that have been flagged as UPDATEd. An error condition results if mass-storage writing is not completed.
Реализация
Описание и определение слова SAVE-BUFFERS в ядре ФОРТ-ЕС:
SAVE-BUFFERS -> ЗАПИСАТЬ НА ДИСК ВСЕ ИСПРАВЛЕННЫЕ БЛОКИ 26 Экран номер 26 ( 31.03.66 SAVE-BUFFERS FLUSH ) : SAVE-BUFFERS ( ->) LIMIT FIRST DO I @ 32768 AND IF I @ 32767 AND DUP I ! I 2+ SWAP WBLK THEN B/BUF 4 + +LOOP ;
Ссылки
- Исходный текст слова SAVE-BUFFERS в Каллисто Классик 1.0
- См. EMPTY-BUFFERS
- Слово SAVE-BUFFERS в стандарте ANS Forth (англ.)
- Слово SAVE-BUFFERS в черновике Forth 200x (англ.)
- ВВОД-ВЫВОД в книге Л.Броуди «Начальный курс программирования на языке Форт»
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |