remove useless slot types from copy-state

db4
Joe Groff 2009-10-30 22:01:51 -05:00
parent 32450a0575
commit d55a3a3445
1 changed files with 4 additions and 4 deletions

View File

@ -271,10 +271,10 @@ ERROR: integer-length-expected obj ;
dup integer? [ integer-length-expected ] unless ; inline
TUPLE: copy-state
{ src-i integer read-only }
{ src sequence read-only }
{ dst-i integer read-only }
{ dst sequence read-only } ;
{ src-i read-only }
{ src read-only }
{ dst-i read-only }
{ dst read-only } ;
C: <copy> copy-state