C,

Материал из ПМК вики
Перейти к навигации Перейти к поиску

C, (байт компилировать, читается «си-запятая») — стандартное слово Каллисто.

C,             ( b −− )                             Скомпилировать b в первый свободный байт словаря.

Компилирует байт b в очередной свободный байт словаря.

Ввод слова C,[править]

В режиме ЛАТ последовательно нажмите три клавиши  С/П     P    ,  

Эти нажатия оставляют клавиатуру в режиме NUM.

C, в стандарте ANS Forth[править]

 6.1.0860   C,                                "c-comma"                     CORE
            ( char -- )
            Резервирует пространство для одного символа в области данных и 
            запоминает char в нем. Если указатель области данных - выровнен на 
            символ перед выполнением C,, он останется выровненным на символ и 
            после окончания выполнения C,. Неопределенная ситуация существует, 
            если указатель области данных - не выровненный на символ до 
            выполнения C,.

        См.: 3.3.3 Область данных, 3.3.3.1 Выравнивание адреса.

История[править]

C, в предыдущем стандарте Forth-83 (англ.)[править]

     C,           16b --                        83           "c-comma"
          ALLOT one byte then store the least-significant 8 bits of
          16b at HERE 1- .

C, в стандарте Forth-79 (англ.)[править]

C,             n --                                       "c-comma"
    Store  the  low-order  8 bits of n at the  next  byte  in  the
    dictionary, advancing the dictionary pointer.

C, в fig-FORTH Release 1 glossary, май 1979 (англ.)[править]

C,            b  ---
       Store 8 bits of b into the next available dictionary byte, advancing
       the dictionary pointer. This is only available on byte addressing
       computers, and should be used with caution on byte addressing mini-
       computers.

Реализация[править]

2946 ;#CComma
2947 ; C,               ( b −− )                             Скомпилировать b в первый свободный байт словаря.
2948 LCCOM:          .DB     2
2949                 .TEXT   "C,"                            ; ( c −− )
2950                 .DW     LCOMMA
2951 CCOM:           .DW CALL, HERE,CSTOR, ONE,ALLOT, EXIT   ; Скомпилировать байт c в очередной свободный байт словаря.

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

: C, ( char -- ) \ 94
\ Зарезервировать место для символа в области данных и поместить туда char.
  DP @ 1 CHARS ALLOT C!
;

Советская реализация[править]

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

C,     +  С-> СКОМПИЛИРОВАТЬ БАЙТ С НА ВЕРШИНУ СЛОВАРЯ          11

                     Экран номер 11
( 31.03.86      !  0!  @  С!  С@  , С, EXECUTE )

: C, ( C-> )  HERE 1 ALLOT C! ;

Определение слова C, в FORTH ИТЭФ:

            HEAD     202Q,'C',254Q,CCOM,$COL              ; C,
            DW HERE,CSTOR,ONE,ALLOT,SEMI

Ссылки[править]


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


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