FILL

FILL (заполнить) — стандартное слово Каллисто.

Записывает u байт c в память начиная с адреса a

Универсальный оператор для заполнения массивов памяти идентичными символами.

Ввод слова FILL

В режиме ЛАТ последовательно нажмите четыре клавиши  П   7   −   − 

FILL в стандарте ANS Forth

6.1.1540   FILL                                                            CORE
           ( c-addr u char -- )
           Если u больше чем нуль, сохраняет char в каждом из u 
           последовательных символов в памяти, начинающейся с c-addr.

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

     FILL         addr u 8b --                  83
          u bytes of memory beginning at addr are set to 8b.  No
          action is taken if u is zero.

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

FILL           addr n byte --                234
    Fill  memory beginning at address with a sequence of n  copies
    of  byte.   If the quantity n is less than or equal  to  zero,
    take no action.

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

FILL addr quan b --
       Fill memory at the address with the specified quantity of bytes b.

Реализация

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

FILL      A,U,C-> ЗАСЛАТЬ С В U БАЙТОВ ПО АДРЕСУ А              22

                     Экран номер 22
( 31.03.86   FILL ERASE BLANK COMPILE [ ] MIN MAX HEX DECIMAL)

: FILL   ( A,U,C->) SWAP ?DUP IF >R OVER C!
     DUP 1+ R> 1- CMOVE EXIT THEN 2DROP ;

Ссылки

• См. также слова ERASE BLANK
• Слово FILL в стандарте ANS Forth (англ.)
• Слово FILL в черновике Forth 200x (англ.)
• Variables, Constants, and Arrays в книге Leo Brodie Starting Forth (англ.)

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

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