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



         

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


В Форт-83 команда ' >BODY засылает тот же адрес поля параметров, что и '

в Форт-79. ( "paren" "скобка" I 83REQ 79REQ Выделяет комментарии, которые должны быть проигнорированы в исходном тексте программы. Форма использования ( ккк) Символы "ккк", выделенные справа ) (закрывающая скобка), считаются комментарием и не обрабатываются. Пробел необходим за (, но не должен предшествовать символу ), который рассматривается в качестве разделителя, а не слова Форта. ( можно использовать как в режиме исполнения, так и компиляции. Число символов в "ккк" может лежать в диапазоне от 0 до числа символов, оставшихся во входном потоке вплоть до закрывающей скобки. В Форт-79, если входной поток иссякнет до закрывающей скобки, будет дано сообщение об ошибке. См. также \. * "times" "умножить" 83REQ 79REQ (n1 n2 -- n3) Умножает n1 на n2, выдавая произведение n3. n3 будет содержать младшие 16 битов произведения, даже если происходит арифметическое переполнение. ** "power" "возвести в степень" 83UNC 79RES ТХТ ( n1 n2 -- n3) Возводит n1 в степень n2, результат n3 кладет в стек. : ** ?dup 0= IF DROP 1 ELSE DUP I = IF DROP ELSE OVER SWAP 1- 0 DO OVER * LOOP SWAP DROP THEN THEN ; */ "times-divide" "умножить-разделить" 83REQ 79REQ */ ( n1 n2 n3 -- n4) Умножает n1 на n2, результат делит на n3, засылает в стек частное n4. Произведение n1 на n2 представляется в виде промежуточного результата двойной длины, обеспечивая большую точность, чем при традиционной последовательности n1 n2 * n3 / В Форт-83 используется деление с нижней границей(1), в то время как в Форт-79 частное округляется в направлении нуля. */MOD "times-divide-mod" "умножить-разделить с остатком" 83REQ 79REQ ( n1 n2 n3 -- n4 n5) Умножает n1 на n2, результат делит на n3, остаток n4 и частное n5 засылаются в стек. Как и в случае */, промежуточное произведение имеет двойную длину. В Форт-83 применено деление,с, нижней границей. + "plus" "плюс" 83REQ 79REQ (n1 n2 -- n3) ======================== 1 Частное округляется в сторону нижней границы (floored), а остаток имеет знак делителя.


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