lib/Tools/nonascii
author nipkow
Wed, 11 Mar 1998 09:33:56 +0100
changeset 4728 b72dd6b2ba56
parent 4508 f102cb0140fe
child 6082 590f9e3bf4d8
permissions -rwxr-xr-x
New Asm_full_simp_tac led to a loop.

#!/bin/bash
#
# $Id$
#
# DESCRIPTION: check files for non-ASCII characters


## diagnostics

PRG=$(basename $0)

function usage()
{
  echo
  echo "Usage: $PRG [FILES|DIRS...]"
  echo
  echo "  Recursively find .thy/.ML files and check for non-ASCII characters."
  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 -e \
    'while(<ARGV>) { if (m/[\x80-\xff]/) { print "$ARGV: $_"; }}'