10 lines
377 B
Factor
10 lines
377 B
Factor
! Copyright (C) 2013 John Benediktsson
|
|
! See http://factorcode.org/license.txt for BSD license
|
|
USING: arrays sequences tools.test ;
|
|
IN: sequences.snipped
|
|
|
|
{ { 0 1 2 5 6 } } [ 3 5 7 iota <snipped> >array ] unit-test
|
|
{ { 0 1 2 } } [ 3 10 7 iota <snipped> >array ] unit-test
|
|
{ { 6 } } [ -1 5 7 iota <snipped> >array ] unit-test
|
|
{ { } } [ -1 10 7 iota <snipped> >array ] unit-test
|