Benutzer-Werkzeuge

Webseiten-Werkzeuge


words:kernel_embedded:stack:2swap
: 2swap ( x1 x2 x3 x4 -- x3 x4 x1 x2 ) 
  rot  ( -- x1 x3 x4 x2 )
  >r   ( -- x1 x3 x4 ) ( R: x2 -- )
  rot  ( -- x3 x4 x1 ) ( R: x2 -- )
  r>   ( -- x3 x4 x1 x2 ) ( R: -- )  ;
words/kernel_embedded/stack/2swap.txt · Zuletzt geändert: 2010-12-29 18:12 von 127.0.0.1