2012-09-11 13:34:24 -04:00
|
|
|
! Copyright (C) 2012 John Benediktsson
|
|
|
|
! See http://factorcode.org/license.txt for BSD license
|
2018-02-15 10:14:56 -05:00
|
|
|
USING: sequences.rotated strings tools.test ;
|
2012-09-11 13:34:24 -04:00
|
|
|
|
|
|
|
{ "fasd" } [ "asdf" -1 <rotated> >string ] unit-test
|
|
|
|
{ "sdfa" } [ "asdf" 1 <rotated> >string ] unit-test
|
|
|
|
{ "asdf" } [ "asdf" 0 <rotated> >string ] unit-test
|
|
|
|
{ "asdf" } [ "asdf" 4 <rotated> >string ] unit-test
|
|
|
|
{ "asdf" } [ "asdf" -4 <rotated> >string ] unit-test
|