2005-04-02 02:39:33 -05:00
|
|
|
! Copyright (C) 2005 Slava Pestov.
|
|
|
|
|
! See http://factor.sf.net/license.txt for BSD license.
|
|
|
|
|
IN: sequences
|
|
|
|
|
USING: generic kernel kernel-internals math strings
|
|
|
|
|
vectors ;
|
|
|
|
|
|
|
|
|
|
! This file is needed very early in bootstrap.
|
|
|
|
|
|
|
|
|
|
! Sequences support the following protocol. Concrete examples
|
|
|
|
|
! are strings, string buffers, vectors, and arrays. Arrays are
|
|
|
|
|
! low level and not bounds-checked; they are in the
|
|
|
|
|
! kernel-internals vocabulary, so don't use them unless you have
|
|
|
|
|
! a good reason.
|
|
|
|
|
|
|
|
|
|
GENERIC: length ( sequence -- n )
|
|
|
|
|
GENERIC: set-length ( n sequence -- )
|
|
|
|
|
GENERIC: nth ( n sequence -- obj )
|
|
|
|
|
GENERIC: set-nth ( value n sequence -- obj )
|
2005-04-03 16:55:56 -04:00
|
|
|
GENERIC: >list ( seq -- list )
|
