]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/unicode/control-pictures/control-pictures-tests.factor
update docs, add another test
[factor.git] / basis / unicode / control-pictures / control-pictures-tests.factor
index 35b2b6d496526f5a47f8716e53b54e0e36fe4e2b..e67f47a5280914c3e8ba6938d78c8a27509a4cc5 100644 (file)
@@ -6,6 +6,7 @@ USING: sequences strings tools.test unicode.control-pictures ;
 
 { "␡" } [ "\x7f" control-pictures ] unit-test
 { "a␡b" } [ "a\x7fb" control-pictures ] unit-test
+{ "a␡b" } [ "a\x7fb" control-pictures* ] unit-test
 
 { "␀␁␂␃␄␅␆␇␈␉␊␋␌␍␎␏␐␑␒␓␔␕␖␗␘␙␚␛␜␝␞␟␠!\"#$%&'()*+,-./" } [
     48 <iota> >string control-pictures*