Язык программирования Форт



         

Приложение А. Глоссарий (список слов Форта) - часть 42


Форт-83 требует сброса величин >IN и BLK в нуль и приравнивая значения #ТIВ значению SPAN. Для приема текста из буфера может использоваться оператор WORD. См. также >IN; #TIB; BLK; EXPECT; SPAN; WORD. QUIT "quit" 83REQ 79REQ ( --) Вызывает немедленный уход из программы и передачу управления оператору. Очищает стек возвратов и подготавливает систему для интерпретации данных, поступающих с активного устройства (обычно клавиатуры). Стек параметров не очищается (в отличие от ABORT), и никаких сообщений или запросов на экран не выдается (даже "ok"). См. также ABORT. R/ "round-divide" "деление с округлением" ТХТ ( n1 n2 -- n3) Делит n1 на n2 и засылает в стек частное n3, которое округлено в большую сторону, если остаток больше n2/2. R> "r-from" "из-R" 83REQ 79REQ ( -- n) Удаляет n из стека возвратов и помещает его в стек параметров. R> вообще должен использоваться в паре с >R, чтобы исключить изменение указателя стека возвратов. См. также R@; >R. R@ "r-fetch" "занести R" 83REQ 79REQ (-- n) Копирует n из стека возвратов в стек параметров (без изменения стека возвратов). R@ полезно, когда стек возвратов используется для временного хранения чисел внутри описаний типа двоеточие. См. также >R; R>. RBLK "r-block" "r-блок" MMS ( адр n --) Читает блок n и укладывает его в память, начиная с адреса адр. См. также WBLK. RECURSE "recurse" "рекурсия" 83CNT ( --) Синоним MYSELF. REPEAT "repead" "повторить" I, С 83REQ 79REQ ( --) Завершает цикл BEGIN... WHILE... REPEAT. При использовании в форме: : ... BEGIN ... флаг WHILE ... REPEAT ... ; компилирует безусловный переход на BEGIN в описании слова . Когда исполняется, слова между BEGIN и REPEAT повторно повторно до тех пор, пока флаг в стеке остается не равным 0. Если флаг соответствует ложно (0), управление передается слову, следующему после REPEAT. См. также BEGIN; WHILE; UNTIL.


Содержание  Назад  Вперед