File tree 2 files changed +9
-5
lines changed
2 files changed +9
-5
lines changed Original file line number Diff line number Diff line change @@ -1634,8 +1634,8 @@ proc automf_command_reference {} {
1634
1634
1635
1635
if {[ regexp {^#.*@section (.*)$} $line -> section] } {
1636
1636
lappend doc($current ) [ list section $section ]
1637
- continue
1638
- }
1637
+ continue
1638
+ }
1639
1639
1640
1640
# Find embedded module names
1641
1641
if {[ regexp {^#.*@module ([^ ]*)} $line -> modulename] } {
@@ -1651,7 +1651,7 @@ proc automf_command_reference {} {
1651
1651
if {$cmd eq " synopsis:" } {
1652
1652
set current $modulename
1653
1653
lappend doc($current ) [ list section " Module: $modulename " ]
1654
- } else {
1654
+ } else {
1655
1655
lappend doc($current ) [ list subsection $cmd ]
1656
1656
}
1657
1657
@@ -2088,8 +2088,12 @@ if {$autosetup(iswin)} {
2088
2088
proc split-path {} {
2089
2089
split [ getenv PATH .] :
2090
2090
}
2091
+ # Check for an executable file
2091
2092
proc file-isexec {exec} {
2092
- file executable $exec
2093
+ if {[ file executable $exec ] && [ file isfile $exec ] } {
2094
+ return 1
2095
+ }
2096
+ return 0
2093
2097
}
2094
2098
}
2095
2099
Original file line number Diff line number Diff line change @@ -9,7 +9,7 @@ for tclsh in ./jimsh0 $autosetup_tclsh jimsh tclsh tclsh8.5 tclsh8.6 tclsh8.7; d
9
9
done
10
10
echo 1>&2 " No installed jimsh or tclsh, building local bootstrap jimsh0"
11
11
for cc in ${CC_FOR_BUILD:- cc} gcc; do
12
- { $cc -o jimsh0 " $d /jimsh0.c" ; } > /dev/null 2>&1 || continue
12
+ { $cc -o jimsh0 " $d /jimsh0.c" ; } 2 > /dev/null > /dev/null || continue
13
13
./jimsh0 " $d /${1-autosetup-test-tclsh} " && exit 0
14
14
done
15
15
echo 1>&2 " No working C compiler found. Tried ${CC_FOR_BUILD:- cc} and gcc."
You can’t perform that action at this time.
0 commit comments