New upstream version 2017.01.22

[deb_pkgs/scowl.git] / src / split-words

diff --git a/src/split-words b/src/split-words
index 3e05f160341d6e7471dacbf74d6964023f623db5..aacd8ec61bb31a8b791d65cba075af05fe993628 100755 (executable)
--- a/src/split-words
+++ b/src/split-words
@@ -14,6 +14,9 @@ comm -12 working/words.$1 working/british_z.lst \
 comm -12 working/words.$1 working/canadian.lst \
   > working/canadian-all.$1.pre
 
+comm -12 working/words.$1 working/australian.lst \
+  > working/australian-all.$1.pre
+
 comm -12 working/words.$1 working/variant_1.lst   \
   > working/variant_1-all.$1.pre
 
@@ -35,6 +38,22 @@ comm -12 working/words.$1 working/canadian_variant_1.lst   \
 comm -12 working/words.$1 working/canadian_variant_2.lst   \
   > working/canadian_variant_2-all.$1.pre
 
+comm -12 working/words.$1 working/australian_variant_1.lst   \
+  > working/australian_variant_1-all.$1.pre
+
+comm -12 working/words.$1 working/australian_variant_2.lst   \
+  > working/australian_variant_2-all.$1.pre
+
+#
+# Hack to get australian only words in
+#
+if [ $1 -eq 35 ]
+then
+  mv working/australian-all.$1.pre working/australian-all.$1.pre.pre
+  cat r/special/australian.35 | src/filter \
+    | cat - working/australian-all.$1.pre.pre | sort -u > working/australian-all.$1.pre
+fi
+
 cat working/*-all.$1.pre         \
   | sort | uniq                  \
   | comm -13 - working/words.$1  \