steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

sequences: don't allow negative repetitions.

db4
John Benediktsson 2013-08-05 09:49:24 -07:00
parent 555ea83d89
commit 1d5a598929
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
core/sequences/sequences.factor
View File

@ -268,7 +268,9 @@ INSTANCE: slice virtual-sequence
! One element repeated many times ! One element repeated many times
TUPLE: repetition { len read-only } { elt read-only } ; TUPLE: repetition { len read-only } { elt read-only } ;
C: <repetition> repetition : <repetition> ( len elt -- repetition )
over 0 < [ non-negative-integer-expected ] when
repetition boa ; inline
M: repetition length len>> ; inline M: repetition length len>> ; inline
M: repetition nth-unsafe nip elt>> ; inline M: repetition nth-unsafe nip elt>> ; inline