lib/Tools/fixdots
author wenzelm
Sun, 15 Oct 2000 19:50:35 +0200
changeset 10220 2a726de6e124
parent 9788 df671fa2562a
child 10511 efb3428c9879
permissions -rwxr-xr-x
proper symbol markup with \isamath, \isatext; support sub/super scripts:
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3824
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
     1
#!/bin/bash
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
     2
#
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
     3
# $Id$
9788
wenzelm
parents: 6082
diff changeset
     4
# Author: Markus Wenzel, TU Muenchen
wenzelm
parents: 6082
diff changeset
     5
# License: GPL (GNU GENERAL PUBLIC LICENSE)
3824
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
     6
#
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
     7
# DESCRIPTION: ensure that dots in formulas are followed by non-idents
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
     8
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
     9
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    10
## diagnostics
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    11
9788
wenzelm
parents: 6082
diff changeset
    12
PRG=$(basename "$0")
3824
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    13
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    14
function usage()
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    15
{
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    16
  echo
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    17
  echo "Usage: $PRG [FILES|DIRS...]"
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    18
  echo
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    19
  echo "  Recursively find .thy/.ML files, patching them to ensure that"
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    20
  echo "  dots in formulas are followed by non-idents."
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    21
  echo
3826
wenzelm
parents: 3825
diff changeset
    22
  echo "  Renames old versions of FILES by appending \"~~\"."
wenzelm
parents: 3825
diff changeset
    23
  echo
3824
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    24
  exit 1
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    25
}
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    26
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    27
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    28
## process command line
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    29
9788
wenzelm
parents: 6082
diff changeset
    30
[ "$#" -eq 0 -o "$1" = "-?" ] && usage
3824
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    31
9788
wenzelm
parents: 6082
diff changeset
    32
SPECS="$@"; shift "$#"
3824
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    33
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    34
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    35
## main
9fdde15e3215 ensure that dots in formulas are followed by non-idents;
wenzelm
parents:
diff changeset
    36
6082
590f9e3bf4d8 configure AUTO_BASH, AUTO_PERL;
wenzelm
parents: 4508
diff changeset
    37
#set by configure
590f9e3bf4d8 configure AUTO_BASH, AUTO_PERL;
wenzelm
parents: 4508
diff changeset
    38
AUTO_PERL=perl
590f9e3bf4d8 configure AUTO_BASH, AUTO_PERL;
wenzelm
parents: 4508
diff changeset
    39
4508
f102cb0140fe do require perl;
wenzelm
parents: 3826
diff changeset
    40
find $SPECS \( -name \*.thy -o -name \*.ML \) -print | \
9788
wenzelm
parents: 6082
diff changeset
    41
  xargs "$AUTO_PERL" -w "$ISABELLE_HOME/lib/scripts/fixdots.pl"