.(

.( (точка и скобка) — стандартное слово Каллисто.

.(             ( −− )                               При компиляции вывести строку, вплоть до закрывающей скобки.

Вывести на индикатор следующие литеры до закрывающей скобки исключительно.

Слово .( работает, как комментарий — только литеры не просто игнорируются, а ещё и выводятся на индикатор.

Ввод слова .(

В режиме NUM последовательно нажмите две клавиши  /−/   ШГ→ 

.( в стандарте ANS Forth

 6.2.0200   .(                         "dot-paren"                      CORE EXT
        Компиляция: Исполняет семантику выполнения, данную ниже.

        Выполнение: ( "ccc<paren>" -- )
            Выделяет и отображает ccc, ограниченную ) (правая круглая скобка). 
            .( является словом немедленного исполнения.

        См.: 3.4.1 Синтаксический анализ, 6.1.0190 .".

 A.6.2.0200   .(
 Типичное использование:
        .( ccc)

История

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

     .(           --                            I,M,83     "dot-paren"
                  --   (compiling)
          Used in the form:
                  .( ccc)
          The characters ccc up to but not including the delimiting )
          (closing parenthesis) are displayed.  The blank following .(
          is not part of ccc.

Реализация

3123 ;#Dotp
3124 ; .(             I ( −− )                               При компиляции вывести строку, вплоть до закрывающей скобки.
3125 ; Выводит текст сообщения, ограниченного правой круглой скобкой.
3126 ; Может использоваться как вне, так и внутри определений через двоеточие.
3127 LCOMQ:          .DB     82H
3128                 .TEXT   ".("
3129                 .DW     LDOTQ
3130 COMQ:           .DW CALL, LITB
3131                 .DB 41                          ; '('
3132                 .DW WORD,COUNT,TYPE, EXIT

Реализация из SP-Forth 4.20:

: .(  \ 94 CORE EXT
\ Компиляция: Выполнить семантику выполнения, данную ниже.
\ Выполнение: ( "ccc<paren>" -- )
\ Выделить и вывести на дисплей ccc, ограниченные правой скобкой ")".
\ .( - слово немедленного исполнения.
  [CHAR] ) PARSE TYPE
; IMMEDIATE

Советская реализация

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

  .(        Н  ->                         НАПЕЧАТАТЬ СЛЕДУЮЩИЕ ЛИТЕРЫ ДО  28
                                        ЗАКРЫВАЮЩЕЙ СКОБКИ ИСКЛЮЧИТЕЛЬНО

                     Экран номер 28
( 31.03.86 LIT" COUNT ," " ". (."/ ." C" ( ,( QUIT ABORT )

: .( ( ->)  C" ) WORD COUNT TYPE ; IMMEDIATE

Ссылки

• Исходный текст слова .( в Каллисто Классик 1.0
• Слово .( (dot-paren) и комментарий к нему в стандарте ANS Forth (англ.)
• Слово .( (dot-paren) и комментарий к нему в черновике Forth 200x (англ.)
• КАК РАБОТАТЬ НА ФОРТЕ в книге Л.Броуди «Начальный курс программирования на языке Форт»

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

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