$Header: /home/radek/cvs/forth-book/dictionary/ansi/2260.swap,v 1.1 2003/12/28 18:21:57 radek Exp $

Jméno

SWAP — prohodí mezi sebou dvě buňky na vrcholu zásobníku, TOS a NOS

Přehled

SWAP   ( n1 n2 → n2 n1 )

Definováno v: dpANS Forth 6.1.2260 CORE

Popis

FIXME:

Příklad použití

.

Kód slova v Qurtus Forthu

Příklad 88. Kód slova SWAP *:[80]

02CE= 82D0: 82B8                              DW      $82B8             ; link to DEPTH
02D0= 82D2: 8453 5741 5000                    DB      $80+4, "SWAP"
02D6= 82D8: 3007                 SWAP:        MOVE.W  TOS, D0           ;=
02D8= 82DA: 3E14                              MOVE.W  (SP), TOS         ;
02DA= 82DC: 3880                              MOVE.W  D0, (SP)
02DC= 82DE: 4E75                              RTS                       ;= EXIT