sorting: inline check-bounds.

db4
John Benediktsson 2014-12-05 09:49:55 -08:00
parent 1aa27963d2
commit 7023cff14b
1 changed files with 1 additions and 1 deletions

View File

@ -148,7 +148,7 @@ PRIVATE>
<PRIVATE
: check-bounds ( alist n -- alist )
[ swap bounds-check 2drop ] curry dupd each ;
[ swap bounds-check 2drop ] curry dupd each ; inline
PRIVATE>