Add declaration to from-end

db4
Slava Pestov 2008-12-15 21:34:25 -06:00
parent de3a4f5462
commit 400b2a0ccb
1 changed files with 1 additions and 1 deletions

View File

@ -121,7 +121,7 @@ INSTANCE: integer immutable-sequence
: (tail) ( seq n -- from to seq ) over length rot ; inline
: from-end [ dup length ] dip - ; inline
: from-end ( seq n -- seq n' ) [ dup length ] dip - ; inline
: (2sequence) ( obj1 obj2 seq -- seq )
tuck 1 swap set-nth-unsafe