#!/bin/bash
#
# $Id$
#
# DESCRIPTION: fix references to obsolete Pure/Sequence structure
## diagnostics
PRG=$(basename $0)
function usage()
{
  echo
  echo "Usage: $PRG [FILES|DIRS...]"
  echo
  echo "  Recursively find .ML files, fixing references to"
  echo "  the obsolete Pure/Sequence structure."
  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 \*.ML -print | xargs $AUTO_PERL -w $ISABELLE_HOME/lib/scripts/fixseq.pl