aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/common/lib/forth2012/double/2rot.frt
blob: 4befd647e94e2c0ef0def6cdbad6235aa4a4abee (plain)
1
2
3
\ 2rot	( w1 w2 w3 w4 w5 w6 -- w3 w4 w5 w6 w1 w2 )	double-ext	two_rote
: 2rot
 >r >r 2swap r> r> 2swap ;