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

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

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

Текущая версия Ваш текст
Строка 5: Строка 5:
== Ввод слова DROP ==
== Ввод слова DROP ==
В [[Режим ЛАТ|режиме ЛАТ]] последовательно нажмите четыре клавиши [[Клавиша K|{{Синяя клавиша|K}}]] [[Клавиша ×|{{Серая клавиша|×}}]] [[Клавиша 5|{{Серая клавиша|5}}]] [[Клавиша 6|{{Серая клавиша|6}}]]
В [[Режим ЛАТ|режиме ЛАТ]] последовательно нажмите четыре клавиши [[Клавиша K|{{Синяя клавиша|K}}]] [[Клавиша ×|{{Серая клавиша|×}}]] [[Клавиша 5|{{Серая клавиша|5}}]] [[Клавиша 6|{{Серая клавиша|6}}]]
== Детали реализации ==
В [[Каллисто]] стек содержит [[Десятичное число|десятичные числа]] — достаточно вместительные, чтобы популярные в ранних версиях Форта числа двойной длины не использовались. Когда их приходится использовать для совместимости с Фортом, слово DROP осуществляет простейший переход от двойной точности к обычной — действие, обратное действию [[S⟩D|S>D]].
Более точная реализация D>S должна проверять верхний элемент на отрицательность (32768 и больше), а также включать умножение на 65536.


== DROP и FDROP в стандарте ANS Forth ==
== DROP и FDROP в стандарте ANS Forth ==
<PRE>
  6.1.1260  DROP                                                            CORE
  6.1.1260  DROP                                                            CORE
             ( x -- )
             ( x -- )
Строка 15: Строка 19:
             ( F: r -- ) or ( r -- )
             ( F: r -- ) or ( r -- )
             Удаляет r со стека с плавающей точкой.
             Удаляет r со стека с плавающей точкой.
</PRE>
== История ==
В Форте слово DROP — одно из самых древних и устоявшихся. Входит под именем DROP во все стандарты Форта, включая fig-Форт и Форт-79.
Впервые оно появилось в 1964 году под именем ; в программе CURVE, написанной Чак Муром на Алголе для Burroughs B5500 ([https://ru.wikipedia.org/wiki/%D0%9D%D0%B0%D1%86%D0%B8%D0%BE%D0%BD%D0%B0%D0%BB%D1%8C%D0%BD%D0%B0%D1%8F_%D1%83%D1%81%D0%BA%D0%BE%D1%80%D0%B8%D1%82%D0%B5%D0%BB%D1%8C%D0%BD%D0%B0%D1%8F_%D0%BB%D0%B0%D0%B1%D0%BE%D1%80%D0%B0%D1%82%D0%BE%D1%80%D0%B8%D1%8F_SLAC Национальная ускорительная лаборатория SLAC], [https://ru.wikipedia.org/wiki/%D0%A1%D1%82%D1%8D%D0%BD%D1%84%D0%BE%D1%80%D0%B4%D1%81%D0%BA%D0%B8%D0%B9_%D1%83%D0%BD%D0%B8%D0%B2%D0%B5%D1%80%D1%81%D0%B8%D1%82%D0%B5%D1%82 Стэнфордский университет]).


В Форте FSP88M слово DROP было известно под именем DR
== DROP в предыдущем стандарте Forth-83 (англ.) ==
 
=== DROP в предыдущем стандарте Forth-83 (англ.) ===
       DROP        16b --                        79
       DROP        16b --                        79
           16b is removed from the stack.
           16b is removed from the stack.


=== DROP в стандарте Forth-79 (англ.) ===
== DROP в стандарте Forth-79 (англ.) ==
  DROP          n --                          233
  DROP          n --                          233
     Drop the top number from the stack.
     Drop the top number from the stack.


=== DROP в fig-FORTH Release 1 glossary, май 1979 (англ.) ===
== DROP в fig-FORTH Release 1 glossary, май 1979 (англ.) ==
  DROP          n  ---                          L0
  DROP          n  ---                          L0
         Drop the number from the stack.
         Drop the number from the stack.


== Реализация ==
== История ==
В [[Каллисто]] стек содержит [[Десятичное число|десятичные числа]] — достаточно вместительные, чтобы популярные в ранних версиях Форта числа двойной длины не использовались. Когда их приходится использовать для совместимости с Фортом, слово DROP осуществляет простейший переход от двойной точности к обычной — действие, обратное действию [[S⟩D|S&gt;D]].
В Форте слово DROP — одно из самых древних и устоявшихся. Входит под именем DROP во все стандарты Форта, включая fig-Форт и Форт-79.
 
Впервые оно появилось в 1964 году под именем ; в программе CURVE, написанной Чак Муром на Алголе для Burroughs B5500 ([https://ru.wikipedia.org/wiki/%D0%9D%D0%B0%D1%86%D0%B8%D0%BE%D0%BD%D0%B0%D0%BB%D1%8C%D0%BD%D0%B0%D1%8F_%D1%83%D1%81%D0%BA%D0%BE%D1%80%D0%B8%D1%82%D0%B5%D0%BB%D1%8C%D0%BD%D0%B0%D1%8F_%D0%BB%D0%B0%D0%B1%D0%BE%D1%80%D0%B0%D1%82%D0%BE%D1%80%D0%B8%D1%8F_SLAC Национальная ускорительная лаборатория SLAC], [https://ru.wikipedia.org/wiki/%D0%A1%D1%82%D1%8D%D0%BD%D1%84%D0%BE%D1%80%D0%B4%D1%81%D0%BA%D0%B8%D0%B9_%D1%83%D0%BD%D0%B8%D0%B2%D0%B5%D1%80%D1%81%D0%B8%D1%82%D0%B5%D1%82 Стэнфордский университет]).


Более точная реализация D&gt;S должна проверять верхний элемент на отрицательность (32768 и больше), а также включать умножение на 65536.
В Форте FSP88M слово DROP известно под именем DR
<pre>
1954 ;#DROP
1955 ; DROP            ( x −− )                            Убрать. Удалить верхний элемент стека.
1956 LDROP:          .DB    4
1957                .TEXT  "DROP"                  ; ( x −− )
1958                .DW    LDDROP
1959 DROP:          .DW    JDROP                  ; JDROP: 1 RM3 + M3  KGOTO9
…
2052 JDROP:          1                              ; Да, это обработчик DROP
2053 NDROP:          RM3 + M3                        ; А сюда сваливается 2DROP
2054                KGOTO9
</pre>
Реализации из SP-Forth 4.20:
<pre>
0 VALUE 'DROP_V
…
: 'DROP 'DROP_V ;
…
: 'DROP
  \ CR ." NEW 'DROP " CURFILE @ ASCIIZ> TYPE SPACE CURSTR @ .
  S" DROP" TC-FINDOUT >VIRT TC-LIT, ; IMMEDIATE
</pre>
<pre>
' DROP >VIRT CONSTANT 'DROP
</pre>
<pre>
CODE DROP ( x -- ) \ 94
\ Убрать x со стека.
    MOV EAX, [EBP]
    LEA EBP, 4 [EBP]
    RET
END-CODE
' DROP TO 'DROP_V
</pre>
<pre>
CODE FDROP  \ *
      FSTP ST(0)
      RET
END-CODE
</pre>


=== Советская реализация ===
== Реализация ==
Слово DROP в ФОРТ-ЕС было [[примитив]]ом. Вот его описание и определение:
Слово DROP в ФОРТ-ЕС было [[примитив]]ом. Вот его описание и определение:
<PRE>
<PRE>
Строка 112: Строка 70:
[[Категория:Примитивы]]
[[Категория:Примитивы]]
[[Категория:Стековые манипуляции Каллисто]]
[[Категория:Стековые манипуляции Каллисто]]
[[Категория:Стандартные слова]]
[[Категория:1994 CORE]]
[[Категория:2012 CORE]]
Пожалуйста, учтите, что любой ваш вклад в проект «ПМК вики» может быть отредактирован или удалён другими участниками. Если вы не хотите, чтобы кто-либо изменял ваши тексты, не помещайте их сюда.
Вы также подтверждаете, что являетесь автором вносимых дополнений, или скопировали их из источника, допускающего свободное распространение и изменение своего содержимого (см. Pmkwiki:Авторские права). НЕ РАЗМЕЩАЙТЕ БЕЗ РАЗРЕШЕНИЯ ОХРАНЯЕМЫЕ АВТОРСКИМ ПРАВОМ МАТЕРИАЛЫ!

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

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

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

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