Fix morse unit tests
parent
185eadf3be
commit
30b94e5e61
|
@ -9,5 +9,5 @@ USING: arrays morse strings tools.test ;
|
||||||
[ "-- --- .-. ... . / -.-. --- -.. ." ] [ "morse code" >morse ] unit-test
|
[ "-- --- .-. ... . / -.-. --- -.. ." ] [ "morse code" >morse ] unit-test
|
||||||
[ "morse code" ] [ "-- --- .-. ... . / -.-. --- -.. ." morse> ] unit-test
|
[ "morse code" ] [ "-- --- .-. ... . / -.-. --- -.. ." morse> ] unit-test
|
||||||
[ "hello, world!" ] [ "Hello, World!" >morse morse> ] unit-test
|
[ "hello, world!" ] [ "Hello, World!" >morse morse> ] unit-test
|
||||||
[ ] [ "sos" 0.075 play-as-morse ] unit-test
|
[ ] [ "sos" 0.075 play-as-morse* ] unit-test
|
||||||
[ ] [ "Factor rocks!" play-as-morse ] unit-test
|
[ ] [ "Factor rocks!" play-as-morse ] unit-test
|
||||||
|
|
Loading…
Reference in New Issue