Skip to content
Snippets Groups Projects
Commit cf8bb9c9 authored by sof's avatar sof
Browse files

[project @ 1998-01-22 16:05:33 by sof]

* [cygwin32]: If consistency checker cannot find executable,
  try a little bit harder..
parent 48a35491
No related merge requests found
...@@ -13,12 +13,15 @@ sub chk_consistency_info { ...@@ -13,12 +13,15 @@ sub chk_consistency_info {
# append .exe if it's not there under cygwin32 # append .exe if it's not there under cygwin32
$executable = "${executable}.exe" if $TargetPlatform eq 'i386-unknown-cygwin32' && $executable = "${executable}.exe" if $TargetPlatform eq 'i386-unknown-cygwin32' &&
$executable !~ /\.exe$/ ; $executable !~ /\...*$/ ;
print STDERR "Checking consistency of: $executable\n" if $Verbose; print STDERR "Checking consistency of: $executable\n" if $Verbose;
&tidy_up_and_die(1, "Panic: no such executable: $executable\n") &tidy_up_and_die(1, "Panic: no such executable: $executable\n")
if ! -x $executable; if ( ! -x $executable ) && ( ! -B $executable );
# perl apparently determines whether something is executable
# by looking at the file suffix under win32/cygwin32 !?!
# Hence, we try binary files if (! -x) fails.
# by this point, consistency strings (with commas) have become # by this point, consistency strings (with commas) have become
# local symbols (with .'s) # local symbols (with .'s)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment