UNUSED
Перейти к навигации
Перейти к поиску
UNUSED (байт свободно) — стандартное слово Каллисто.
UNUSED ( −− U ) Оценить количество свободных байт.
Оценить объём свободной байтовой памяти, доступной разработчику.
UNUSED в стандарте ANS Forth[править]
6.2.2395 UNUSED CORE EXT ( -- u ) u - количество оставшегося пространства в области адресуемой HERE, в адресуемых элементах.
Реализация[править]
В Каллисто 1.0 слово UNUSED вычисляет разницу между RP@ и PAD:
515 ;#UNUSED 516 ; UNUSED ( −− U ) Оценить количество свободных байт. 517 LFREE: .DB 6 ; ( −− n) 518 .TEXT "UNUSED" 519 .DW LWARM 520 FREE: .DW CALL, RPAT,PAD,SUB, EXIT ; Положить на стек количество свободных байт в словаре.
Положенное на стек число U отражает ситуацию, но не точно. При необходимости часть пересчитанных свободных байт будет использована Каллисто под стек возвратов, а также при вводе строки с клавиатуры.
Реализация из SP-Forth 4.20:
512 1024 * TO IMAGE-SIZE 0x8050000 CONSTANT IMAGE-START … 0x80000 VALUE IMAGE-SIZE … : UNUSED ( -- u ) \ 94 CORE EXT \ u - объем памяти, оставшейся в области, адресуемой HERE, \ в байтах. IMAGE-SIZE HERE IMAGE-BASE - - ;
Ссылки[править]
- Исходный текст слова UNUSED в Каллисто Классик 1.0
- Слово UNUSED в стандарте ANS Forth (англ.)
- Слово UNUSED в черновике Forth 200x (англ.)
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |