Fix specialized-arrays.direct.functor

db4
Slava Pestov 2009-01-28 15:46:04 -06:00
parent ddd8c2b67e
commit 1a409b9213
1 changed files with 2 additions and 2 deletions

View File

@ -27,8 +27,8 @@ TUPLE: A
M: A length length>> ; M: A length length>> ;
M: A nth-unsafe underlying>> NTH call ; M: A nth-unsafe underlying>> NTH call ;
M: A set-nth-unsafe underlying>> SET-NTH call ; M: A set-nth-unsafe underlying>> SET-NTH call ;
M: A like drop dup A instance? [ >A' execute ] unless ; M: A like drop dup A instance? [ >A' ] unless ;
M: A new-sequence drop <A'> execute ; M: A new-sequence drop <A'> ;
INSTANCE: A sequence INSTANCE: A sequence