unicode.breaks: Rename words to unicode-words

diff --git a/basis/unicode/breaks/breaks.factor b/basis/unicode/breaks/breaks.factor
index 8d8f7c01305ea3de65a0e8f79476a9820c52cdb5..c6460c8edd74f64b7e3dfc8f66e4704e60745dea 100644 (file)
--- a/basis/unicode/breaks/breaks.factor
+++ b/basis/unicode/breaks/breaks.factor
@@ -153,7 +153,7 @@ CONSTANT: wMidNum 9
 CONSTANT: wMidNumLet 10
 CONSTANT: wNumeric 11
 CONSTANT: wExtendNumLet 12
-CONSTANT: words 13
+CONSTANT: unicode-words 13
 
 ! Is there a way to avoid this?
 CONSTANT: word-break-classes H{
@@ -182,8 +182,8 @@ SYMBOL: check-number-after
 
 : make-word-table ( -- )
     { wCR } { wLF } connect
-    { wNewline wCR wLF } words iota disconnect
-    words iota { wNewline wCR wLF } disconnect
+    { wNewline wCR wLF } unicode-words iota disconnect
+    unicode-words iota { wNewline wCR wLF } disconnect
     { wALetter } { wMidLetter wMidNumLet } check-letter-after set-table
     { wMidLetter wMidNumLet } { wALetter } check-letter-before set-table
     { wNumeric wALetter } { wNumeric wALetter } connect
@@ -199,7 +199,7 @@ SYMBOL: check-number-after
     ] map ;
 
 "word-table" create-in
-words init-table table
+unicode-words init-table table
 [ make-word-table finish-word-table ] with-variable
 define-constant
 >>