lib/Tools/fixgoal
author paulson
Wed, 22 Jun 2005 11:20:45 +0200
changeset 16528 25a7459d4d4a
parent 15847 c05c7670f166
permissions -rwxr-xr-x
pointer equality for sml/nj

#!/usr/bin/env bash
#
# $Id$
# Author: Markus Wenzel, TU Muenchen
#
# DESCRIPTION: replace goal(w) commands by implicit versions Goal(w)


## diagnostics

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

function usage()
{
  echo
  echo "Usage: $PRG [FILES|DIRS...]"
  echo
  echo "  Recursively find .ML files, replacing goal(w)"
  echo "  commands by implicit versions Goal(w)"
  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/fixgoal.pl"