lib/Tools/unsymbolize
author wenzelm
Tue, 08 Apr 2008 15:47:10 +0200
changeset 26576 fc76b7b79ba9
parent 15847 c05c7670f166
child 28650 a7ba12e0d3b7
permissions -rwxr-xr-x
removed obsolete AUTO_PERL feature;

#!/usr/bin/env bash
#
# $Id$
# Author: Markus Wenzel, TU Muenchen
#
# DESCRIPTION: remove unreadable symbol names from sources


## diagnostics

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

function usage()
{
  echo
  echo "Usage: $PRG [FILES|DIRS...]"
  echo
  echo "  Recursively find .thy/.ML files, removing unreadable symbol names."
  echo "  Note: this is an ad-hoc script; there is no systematic way to replace"
  echo "  symbols independently of the inner syntax of a theory!"
  echo
  echo "  Renames old versions of FILES by appending \"~~\"."
  echo
  exit 1
}


## process command line

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

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


## main

find $SPECS \( -name \*.ML -o -name \*.thy \) -print | \
  xargs perl -w "$ISABELLE_HOME/lib/scripts/unsymbolize.pl"