tmac/hyphenex.sh

   1 # hyphenex.sh
   2 #
   3 # This small filter converts a hyphenation exception log article for
   4 # TUGBoat to a real \hyphenation block.
   5 #
   6 # Written by Werner Lemberg <wl@gnu.org>.
   7 #
   8 # Version 1.0 (2003/01/25)
   9
  10 sed -n '
  11 1 i\
  12 % Hyphenation exceptions for US English, based on the hyphenation exception\
  13 % log article in TUGBoat.\
  14 %\
  15 % This is an automatically generated file.  Do not edit!\
  16 \
  17 \\hyphenation{
  18 $ i\
  19 }\
  20 \
  21 % EOF
  22 /^\\tabalign/ {
  23   s/{}//g
  24   s/[   ][      ]*/ /g
  25   s/ *\\[^ ][^ ]*$//
  26   s/\\tabalign *[^ ][^ ]*.*& *\(.*\)$/  \1/p
  27   b
  28 }
  29 /^\\[123456]/! d
  30 s/\\4/\\1/
  31 s/\\5/\\2/
  32 s/\\6/\\3/
  33 s/[     ][      ]*/ /g
  34 s/^/  /
  35 s/\\1 [^ ][^ ]* {\(.*\)}$/\1/
  36 s/\\2 [^ ][^ ]* {\(.*\) \(.*\),\(.*\),\(.*\)}$/\1\n  \1\2\n  \1\3\n  \1\4/
  37 s/\\2 [^ ][^ ]* {\(.*\) \(.*\),\(.*\)}$/\1\n  \1\2\n  \1\3/
  38 s/\\2 [^ ][^ ]* {\(.*\) \(.*\)}$/\1\n  \1\2/
  39 s/\\3 [^ ][^ ]* {\(.*\) \(.*\) \(.*\)}$/\1\2\n  \1\3/
  40 s/\\1 [^ ][^ ]* {\(.*\)} .*$/\1/
  41 s/\\2 [^ ][^ ]* {\(.*\) \(.*\),\(.*\),\(.*\)} .*$/\1\n  \1\2\n  \1\3\n  \1\4/
  42 s/\\2 [^ ][^ ]* {\(.*\) \(.*\),\(.*\)} .*$/\1\n  \1\2\n  \1\3/
  43 s/\\2 [^ ][^ ]* {\(.*\) \(.*\)} .*$/\1\n  \1\2/
  44 s/\\3 [^ ][^ ]* {\(.*\) \(.*\) \(.*\)} .*$/\1\2\n  \1\3/
  45 s/\\1 {.*} {\(.*\)}$/\1/
  46 s/\\2 {.*} {\(.*\) \(.*\),\(.*\),\(.*\)}$/\1\n  \1\2\n  \1\3\n  \1\4/
  47 s/\\2 {.*} {\(.*\) \(.*\),\(.*\)}$/\1\n  \1\2\n  \1\3/
  48 s/\\2 {.*} {\(.*\) \(.*\)}$/\1\n  \1\2/
  49 s/\\3 {.*} {\(.*\) \(.*\) \(.*\)}$/\1\2\n  \1\3/
  50 s/\\1 {.*} {\(.*\)} .*$/\1/
  51 s/\\2 {.*} {\(.*\) \(.*\),\(.*\),\(.*\)} .*$/\1\n  \1\2\n  \1\3\n  \1\4/
  52 s/\\2 {.*} {\(.*\) \(.*\),\(.*\)} .*$/\1\n  \1\2\n  \1\3/
  53 s/\\2 {.*} {\(.*\) \(.*\)} .*$/\1\n  \1\2/
  54 s/\\3 {.*} {\(.*\) \(.*\) \(.*\)} .*$/\1\2\n  \1\3/
  55 s/\\1 [^ ][^ ]* \([^ ][^ ]*\)$/\1/
  56 s/\\2 [^ ][^ ]* \([^ ][^ ]*\) \([^ ][^ ]*\),\([^ ][^ ]*\),\([^ ][^ ]*\)$/\1\n  \1\2\n  \1\3\n  \1\4/
  57 s/\\2 [^ ][^ ]* \([^ ][^ ]*\) \([^ ][^ ]*\),\([^ ][^ ]*\)$/\1\n  \1\2\n  \1\3/
  58 s/\\2 [^ ][^ ]* \([^ ][^ ]*\) \([^ ][^ ]*\)$/\1\n  \1\2/
  59 s/\\3 [^ ][^ ]* \([^ ][^ ]*\) \([^ ][^ ]*\) \([^ ][^ ]*\)$/\1\2\n  \1\3/
  60 s/\\1 [^ ][^ ]* \([^ ][^ ]*\) .*$/\1/
  61 s/\\2 [^ ][^ ]* \([^ ][^ ]*\) \([^ ][^ ]*\),\([^ ][^ ]*\),\([^ ][^ ]*\) .*$/\1\n  \1\2\n  \1\3\n  \1\4/
  62 s/\\2 [^ ][^ ]* \([^ ][^ ]*\) \([^ ][^ ]*\),\([^ ][^ ]*\) .*$/\1\n  \1\2\n  \1\3/
  63 s/\\2 [^ ][^ ]* \([^ ][^ ]*\) \([^ ][^ ]*\) .*$/\1\n  \1\2/
  64 s/\\3 [^ ][^ ]* \([^ ][^ ]*\) \([^ ][^ ]*\) \([^ ][^ ]*\) .*$/\1\2\n  \1\3/
  65 s/\*//
  66 s/\\llap *{\(.*\)}/\1/
  67 s/\\[^ ]* //
  68 s/\\[^ ][^ ]*$//
  69 s/{.*}//
  70 p
  71 '
  72
  73 # EOF