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

circular-tests, typos

db4
Jon Harper 2013-07-29 21:23:05 +02:00 committed by John Benediktsson
parent 316747e471
commit 2dba2504fa
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/circular/circular-tests.factor
View File

@ -1,7 +1,7 @@
! Copyright (C) 2005, 2006 Alex Chapman, Daniel Ehrenberg ! Copyright (C) 2005, 2006 Alex Chapman, Daniel Ehrenberg
! See http://factorcode.org/license.txt for BSD license ! See http://factorcode.org/license.txt for BSD license
USING: arrays kernel tools.test sequences sequences.private USING: arrays circular kernel math sequences sequences.private
circular strings ; strings tools.test ;
IN: circular.tests IN: circular.tests
[ 0 ] [ { 0 1 2 3 4 } <circular> 0 swap virtual@ drop ] unit-test [ 0 ] [ { 0 1 2 3 4 } <circular> 0 swap virtual@ drop ] unit-test
@ -45,6 +45,6 @@ IN: circular.tests
[ V{ 1 2 3 1 2 } ] [ [ V{ 1 2 3 1 2 } ] [
{ 1 2 3 } <circular> V{ } [ { 1 2 3 } <circular> V{ } [
[ [ push ] [ length 4 < ] bi ] curry circular-while [ [ push ] [ length 5 < ] bi ] curry circular-while*
] keep ] keep
] unit-test ] unit-test