pdf.wrap: adding some tests.

2013-03-27 19:05:20 -07:00 · 2013-03-27 19:05:20 -07:00 · 677f87ae0d
parent b38f96de9b
commit 677f87ae0d
1 changed files with 14 additions and 0 deletions
--- a/extra/pdf/wrap/wrap-tests.factor
+++ b/extra/pdf/wrap/wrap-tests.factor
@ -0,0 +1,14 @@
+USING: fonts tools.test ;
+IN: pdf.wrap
+
+{ "hello,      " "extra spaces" } [
+    "hello,      extra spaces" word-split1
+] unit-test
+
+{ { "hello, " "world " "how " "are " "you?" } } [
+    "hello, world how are you?" word-split
+] unit-test
+
+{ { "hello, world " "how are you?" } } [
+    "hello, world how are you?" monospace-font 100 visual-wrap
+] unit-test