\S

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

\S — стандартное слово Каллисто. Закончить интерпретацию экрана.

\S             ( −− )                               Комментарий. Игнорировать остаток экрана.

Обычно слово \S используется для ускорения процесса загрузки экрана.

Ввод слова \S[править]

В режиме NUM последовательно нажмите четыре клавиши  F   /−/     Р-ГРД-Г   1 

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

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

В некоторых реализациях Форта функции \S и EXIT выполняет одно и тоже слово ;S — просто разные контексты употребления.

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

     ;S           --                           Interpret only "semi-s"
          Stop interpretation of a block.

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

;S                                                         "semi-s"
    Stop interpretation of a block.  For execution only.

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

3588 ;#bsS
3589 ; \S             I ( −− )                               Комментарий. Игнорировать остаток экрана.
3590 LSEMIS:         .DB     82H,92                  ; "\S" ( −− )
3591                 .TEXT   "S"
3592                 .DW     LBSLASH                 ; Закончить интерпретацию экрана.
3593 SEMIS:          .DW CALL, QLOAD, LEV, EXIT      ; Выход из INTERPRET в LOAD

Thinking Forth (стр. 278, Appendix C Other Utilities Described in This Book) определяет слово \S таким образом:

: \s   B/BUF >in ! ;

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

: \EOF  ( -- )
\ Заканчивает трансляцию текущего потока
  BEGIN REFILL 0= UNTIL
  POSTPONE \
;

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

В ядре ФОРТ-ЕС слово \S называлось ;S

Вот его описание и определение:

  ;S      +НЭ ->                          ЗАКОНЧИТЬ ИНТЕРПРЕТАЦИЮ ЭКРАНА  41

                    Экран номер 41
( 31.03.86  -TRAILING  ' ['] [COMPILE] LOAD THRU ;S  --> )

: ;S ( ->) ?LOADING RDROP ; IMMEDIATE

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


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


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