Imported Upstream version 2015.08.24

[deb_pkgs/scowl.git] / 7.1 / src / make-words

diff --git a/7.1/src/make-words b/7.1/src/make-words
deleted file mode 100755 (executable)
index bc68a0d..0000000
--- a/7.1/src/make-words
+++ /dev/null
@@ -1,62 +0,0 @@
-#!/bin/bash
-
-rm -f words.$1*
-
-shopt -s nullglob
-
-max_level=`src/get-level max`
-
-if [ $1 -ne $max_level ]
-then
-
-  supplement=`src/get-all-below $1 supplement`  
-  add_affixes="`src/get-all-below $1 add-affixes`"
-  add_possessive="`src/get-all-below $1 add-possessive`"
-
-  cat $supplement $add_affixes $add_possessive l/include/$1/* \
-    | src/filter                                              \
-    > working/words.$1.tmp
-  cp working/words.$1.tmp working/words.$1.tmp.0
-
-  if [ -n "$add_affixes" ] && [ $1 -le `cat l/add-affixes/max-level` ]
-  then
-    echo "Adding affixes"
-    cat $add_affixes | src/filter | src/add-affixes >> working/words.$1.tmp
-    cp working/words.$1.tmp working/words.$1.tmp.1
-  fi
-
-  if [ $1 -lt 80 ]
-  then
-    if [ -n "$add_possessive" ]
-    then
-      echo "Adding possessive"
-      cat $add_possessive | src/filter | src/add-affixes just-possessive >> working/words.$1.tmp
-      cp working/words.$1.tmp working/words.$1.tmp.2
-    fi
-  else
-    echo "Adding possessive"
-    cat working/words.$1.tmp                       \
-      | src/add-affixes use-some just-possessive   \
-      > working/words.$1.tmp2
-    mv working/words.$1.tmp2 working/words.$1.tmp
-  fi
-
-  cat working/words.$1.tmp    \
-    | src/add-other-spellings \
-    | src/add-other-forms     \
-    | src/add-other-spellings \
-    | sort -u                 \
-    | comm -12  - working/words.`src/get-level next $1` \
-    > working/words.$1
-
-  #rm working/words.$1.tmp
-
-else
-
-  cat working/all.lst           \
-    | src/add-affixes use-all just-possessive \
-    | src/add-other-spellings   \
-    | sort -u                   \
-    > working/words.$1
-
-fi