Редактирование: R@

Перейти к навигации Перейти к поиску
Внимание: Вы не вошли в систему. Ваш IP-адрес будет общедоступен, если вы запишете какие-либо изменения. Если вы войдёте или создадите учётную запись, её имя будет использоваться вместо IP-адреса, наряду с другими преимуществами.

Правка может быть отменена. Пожалуйста, просмотрите сравнение версий ниже, чтобы убедиться, что это нужная вам правка, и запишите страницу ниже, чтобы отменить правку.

Текущая версия Ваш текст
Строка 1: Строка 1:
'''R@''' (извлечь возврат, читается «ар-извлечь») — стандартное слово [[Каллисто]].
'''R@''' (разыменовать [[Стек возвратов Каллисто|стек возвратов]], читается «ар-извлечь») — стандартное слово [[Каллисто]].
  R@            ( −− D )                            Скопировать значение D со стека возвратов.
  R@            ( −− D )                            Скопировать значение D со стека возвратов.
Копирует верхнее 16-битное целое со знаком из [[Стек возвратов Каллисто|стека возвратов]] в [[Стек данных|стек данных]].
Копирует верхнее 16-битное число из [[Стек возвратов Каллисто|стека возвратов]] в [[Стек данных|стек данных]]. Тоже самое, что [[Слово I|I]]
 
Если вам нужно достать со [[Стек возвратов Каллисто|стека возвратов]] беззнаковое целое, используйте [[слово I]].


== Ввод слова R@ ==
== Ввод слова R@ ==
Строка 11: Строка 9:


== R@ в стандарте ANS Forth ==
== R@ в стандарте ANS Forth ==
<PRE>
  6.1.2070  R@                                "r-fetch"                    CORE
  6.1.2070  R@                                "r-fetch"                    CORE
         Интерпретация: Семантика интерпретации для этого слова не определена.
         Интерпретация: Семантика интерпретации для этого слова не определена.
Строка 20: Строка 17:
         См.: 3.2.3.3 Стек возвратов, 6.1.0580 >R, 6.1.2060 R>, 6.2.0340 2>R,  
         См.: 3.2.3.3 Стек возвратов, 6.1.0580 >R, 6.1.2060 R>, 6.2.0340 2>R,  
             6.2.0410 2R>, 6.2.0415 2R@.
             6.2.0410 2R>, 6.2.0415 2R@.
</PRE>


== История ==
== R@ в предыдущем стандарте Forth-83 (англ.) ==
=== R@ в предыдущем стандарте Forth-83 (англ.) ===
       R@          -- 16b                        C,79        "r-fetch"
       R@          -- 16b                        C,79        "r-fetch"
           16b is a copy of the top of the return stack.
           16b is a copy of the top of the return stack.


=== R@ в стандарте Forth-79 (англ.) ===
== R@ в стандарте Forth-79 (англ.) ==
  R@            -- n                          C,228        "r-fetch"
  R@            -- n                          C,228        "r-fetch"
     Copy the number on top of the return stack to the data stack.
     Copy the number on top of the return stack to the data stack.


=== R в fig-FORTH Release 1 glossary, май 1979 (англ.) ===
== R в fig-FORTH Release 1 glossary, май 1979 (англ.) ==
  R              ---  n
  R              ---  n
         Copy the top of the return stack to the computation stack.
         Copy the top of the return stack to the computation stack.


== Реализация ==
== Реализация ==
<pre>
1814 JFR2:          KRMA RME ∗ KRM5 + M0
1815                32768 −
1816                FX>=0 FROMR1
1817                FANS − KM3  KGOTO9
1818 FROMR1:        RM0 KM3  KGOTO9
1819
1820 ;#RFetch
1821 ; R@              ( −− D )                            Скопировать значение D со стека возвратов.
1822 LRAT:          .DB    2
1823                .TEXT  "R@"                    ; ( −− n )
1824                .DW    LFROMR
1825 RAT:            .DW    JR
1826 JR:            RM2 MA M5  GOTO JFR2            ; Тоже, что и I −− но для целых со знаком.
</pre>
Реализация из SP-Forth 4.20:
<pre>
CODE R@ \ 94
\ Исполнение: ( -- x ) ( R: x -- x )
\ Интерпретация: семантика в режиме интерпретации неопределена.
    LEA EBP, -4 [EBP]
    MOV [EBP], EAX
    MOV EAX, 4 [ESP]
    RET
END-CODE
</pre>
=== Советская реализация ===
Слово R@ в ФОРТ-ЕС и FORTH ИТЭФ было [[примитив]]ом. Вот его описание и определение в ФОРТ-ЕС:
Слово R@ в ФОРТ-ЕС и FORTH ИТЭФ было [[примитив]]ом. Вот его описание и определение в ФОРТ-ЕС:
<PRE>
<PRE>
Строка 85: Строка 52:
== Ссылки ==
== Ссылки ==
* {{Исходник|RFetch|R@}}
* {{Исходник|RFetch|R@}}
* См. слова [[R⟩|R&gt;]], [[⟩R|&gt;R]], [[RDROP]], [[UNLOOP]], [[Слово I|I]], [[Слово J|J]] и [[Слово K|K]]
* Слово [http://forth.sourceforge.net/standard/dpans/dpans6.htm#6.1.2070 R@ (r-fetch)] в стандарте ANS Forth ''(англ.)''
* Слово [http://forth.sourceforge.net/standard/dpans/dpans6.htm#6.1.2070 R@ (r-fetch)] в стандарте ANS Forth ''(англ.)''
* Слово [http://forth-standard.org/standard/core/RFetch R@ (r-fetch)] в черновике Forth 200x ''(англ.)''
* Слово [http://forth-standard.org/standard/core/RFetch R@ (r-fetch)] в черновике Forth 200x ''(англ.)''
Строка 98: Строка 64:
[[Категория:Примитивы]]
[[Категория:Примитивы]]
[[Категория:Операции со стеком возвратов Каллисто]]
[[Категория:Операции со стеком возвратов Каллисто]]
[[Категория:Стандартные слова]]
[[Категория:Слова Каллисто без стековых диаграмм]]
[[Категория:1994 CORE]]
[[Категория:2012 CORE]]
Пожалуйста, учтите, что любой ваш вклад в проект «ПМК вики» может быть отредактирован или удалён другими участниками. Если вы не хотите, чтобы кто-либо изменял ваши тексты, не помещайте их сюда.
Вы также подтверждаете, что являетесь автором вносимых дополнений, или скопировали их из источника, допускающего свободное распространение и изменение своего содержимого (см. Pmkwiki:Авторские права). НЕ РАЗМЕЩАЙТЕ БЕЗ РАЗРЕШЕНИЯ ОХРАНЯЕМЫЕ АВТОРСКИМ ПРАВОМ МАТЕРИАЛЫ!

В целях защиты вики от автоматического спама в правках просим вас решить следующую каптчу:

Отменить Справка по редактированию (в новом окне)

Шаблоны, используемые на этой странице:

Источник — https://pmk.the-hacker.ru/R@