9 lines
286 B
Factor
9 lines
286 B
Factor
USING: test base64 ;
|
|
|
|
[ "abcdefghijklmnopqrstuvwxyz" ] [ "abcdefghijklmnopqrstuvwxyz" >base64 base64>
|
|
] unit-test
|
|
[ "" ] [ "" >base64 base64> ] unit-test
|
|
[ "a" ] [ "a" >base64 base64> ] unit-test
|
|
[ "ab" ] [ "ab" >base64 base64> ] unit-test
|
|
[ "abc" ] [ "abc" >base64 base64> ] unit-test
|