kernel: fix stack effect for -rotd.

clean-macosx-x86-32
John Benediktsson 2019-07-23 16:23:27 -07:00
parent 4b246b6130
commit 2692227fbc
1 changed files with 1 additions and 1 deletions

View File

@ -123,7 +123,7 @@ DEFER: if
: rotd ( w x y z -- x y w z ) [ rot ] dip ; inline
: -rotd ( w x y z -- w z x y ) [ -rot ] dip ; inline
: -rotd ( w x y z -- y w x z ) [ -rot ] dip ; inline
: roll ( w x y z -- x y z w ) rotd swap ; inline