lib/Tools/fixgreek
author skalberg
Thu, 28 Aug 2003 01:56:40 +0200
changeset 14171 0cab06e3bbd0
child 14981 e73f8140af78
permissions -rwxr-xr-x
Extended the notion of letter and digit, such that now one may use greek, gothic, euler, or calligraphic letters as normal letters.

#!/usr/bin/env bash
#
# $Id$
# Author: Sebastian Skalberg, TU Muenchen
# License: GPL (GNU GENERAL PUBLIC LICENSE)
#
# DESCRIPTION: fix problems with greek and other foreign letters


## diagnostics

PRG="$(basename "$0")"

function usage()
{
  echo
  echo "Usage: $PRG [FILES|DIRS...]"
  echo
  echo "  Recursively find .thy files, fixing parse problems stemming"
  echo "  from the classification change of greek and other foreign"
  echo "  letters from symbols to letters."
  echo
  echo "  Renames old versions of FILES by appending \"~~\"."
  echo
  exit 1
}


## process command line

[ "$#" -eq 0 -o "$1" = "-?" ] && usage

SPECS="$@"; shift "$#"


## main

#set by configure
AUTO_PERL=perl

find $SPECS -name \*.thy -print | xargs "$AUTO_PERL" -w "$ISABELLE_HOME/lib/scripts/fixgreek.pl"
find $SPECS -name \*.ML -print | xargs "$AUTO_PERL" -w "$ISABELLE_HOME/lib/scripts/fixgreek.pl"