diff options
Diffstat (limited to 'atarist/test/binhandl')
-rw-r--r-- | atarist/test/binhandl | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/atarist/test/binhandl b/atarist/test/binhandl deleted file mode 100644 index 6f62f4d6cc..0000000000 --- a/atarist/test/binhandl +++ /dev/null @@ -1,15 +0,0 @@ -die "Usage: binhandl files ...\n" if $#ARGV < $[; - -NEXTFILE: -while ($FILEHAND = shift) { - unless (open(FILEHAND)) { - printf STDERR "Can't open \"$FILEHAND\"\n"; - next NEXTFILE; - } - if (-B FILEHAND) { - print "\"$FILEHAND\" is binary\n"; - } else { - print "\"$FILEHAND\" is text\n"; - } - close(FILEHAND); -} |