Handbook
Glossary
cycles
Vocabulary
sequences
.
repeating
Definition
USING:
circular
math
;
IN:
sequences.repeating
TUPLE:
cycles
{
circular
circular
read-only
initial:
T{
circular
}
}
{
length
integer
read-only
initial:
0
}
;
Methods
USING:
accessors
sequences
sequences.repeating
;
M:
cycles
length
length>>
;
USING:
accessors
generic
kernel
sequences
sequences.repeating
sequences.repeating.private
;
M:
cycles
maximum
dup
full-cycle?
[
circular>>
maximum
]
[
M\
cycles
maximum
(call-next-method)
]
if
;
inline
USING:
accessors
generic
kernel
sequences
sequences.repeating
sequences.repeating.private
;
M:
cycles
minimum
dup
full-cycle?
[
circular>>
minimum
]
[
M\
cycles
minimum
(call-next-method)
]
if
;
inline
USING:
accessors
sequences
sequences.repeating
;
M:
cycles
set-length
length<<
;
USING:
accessors
sequences
sequences.repeating
;
M:
cycles
virtual-exemplar
circular>>
;
USING:
accessors
sequences
sequences.repeating
;
M:
cycles
virtual@
circular>>
;