Make a word inline
parent
2a0df14200
commit
53c1ff1cc8
|
|
@ -257,7 +257,7 @@ INSTANCE: repetition immutable-sequence
|
|||
|
||||
: check-copy ( src n dst -- )
|
||||
over 0 < [ bounds-error ] when
|
||||
>r swap length + r> lengthen ;
|
||||
>r swap length + r> lengthen ; inline
|
||||
|
||||
PRIVATE>
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue