−TRAILING

−TRAILING — стандартное слово Каллисто.

Отсечь конечные пробелы.

Команда ADR N −TRAILING сокращает значение N на число пробелов между последним значащим символом и адресом ADR+N. Этот оператор может использоваться перед TYPE и особенно полезен при печати, так как исключает холостые пробеги каретки.

Ввод слова −TRAILING

В режиме NUM последовательно нажмите клавиши  −     Р-ГРД-Г   2   ×   ШГ←   7   −   7   4   БП 

Для возврата в режим NUM нажмите синюю клавишу  P .

−TRAILING в стандарте ANS Forth

17.6.1.0170   -TRAILING              "dash-trailing"                     STRING
           ( c-addr u1 -- c-addr u2 )
           Если u1 больше чем нуль, u2 равно u1 минус число пробелов в конце 
           символьной строки, определенной c-addr u1. Если u1 нуль или вся 
           строка состоит из пробелов, u2 нулевой.

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

     -TRAILING    addr +n1 -- addr +n2          79     "dash-trailing"
          The character count +n1 of a text string beginning at addr
          is adjusted to exclude trailing spaces.  If +n1 is zero,
          then +n2 is also zero.  If the entire string consists of
          spaces, then +n2 is zero.

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

-TRAILING      addr n1 -- addr n2            148    "dash-trailing"
    Adjust  the character count n1 of a text string  beginning  at
    addr  to  exclude trailing blanks,  i.e.,  the  characters  at
    addr+n2 to addr+n1-1 are blanks.  An error condition exists if
    n1 is negative.

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

-TRAILING      addr n1 --- addr n2
       Adjusts the character count n1 of a text string beginning address to
       suppress the output of trailing blanks. i.e. the characters at
       addr+n1 to addr+n2 are blanks.

История

В Форте FSP88 это слово известно под именем -TRAIL

Ссылки

• Слово −TRAILING (dash-trailing) в стандарте ANS Forth (англ.)
• Слово −TRAILING (dash-trailing) в черновике Forth 200x (англ.)

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

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