paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-24 02:19:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

Handle collect2 -plugin option and avoid error output on non-existing gdb.exe

Browse Source 
git-svn-id: trunk@32221 -
This commit is contained in:
pierre 2015-11-02 15:07:33 +00:00
parent d25a768b1d
commit 51d849ae3b
1 changed files with 17 additions and 3 deletions

20
packages/gdbint/gen-gdblib-inc.sh
View File

@ -387,6 +387,11 @@ BEGIN {
print "echo dynamic linker " list[i] " skipped";
continue
}
if ( list[i] ~ /^-plugin$/ ) {
i++;
print "echo collect2 -plugin " list[i] " skipped";
continue
}
if ( list[i] ~ /lib[^ ]*\.so/ ) {
dynamiclib = gensub (/([^ ]*)(lib[^ ]*\.so)/,"\\1\\2 ","g",list[i]);
print "echo " dynamiclib " found";
@ -424,9 +429,13 @@ chmod u+x ./copy-libs.sh
# Check if mingw executable contains
# __cpu_features_init function
has_cpu_features_init=`objdump -t gdb.exe | grep cpu_features_init `
if [ "X$has_cpu_features_init" == "X" ] ; then
mingw_no_cpu_features_init=1
if [ -f gdb.exe ] ; then
has_cpu_features_init=`objdump -t gdb.exe | grep cpu_features_init `
if [ "X$has_cpu_features_init" == "X" ] ; then
mingw_no_cpu_features_init=1
else
mingw_no_cpu_features_init=0
fi
else
mingw_no_cpu_features_init=0
fi
@ -472,6 +481,11 @@ BEGIN {
print "{ Dynamic linker found " list[i] " }";
continue
}
if ( list[i] ~ /^-plugin$/ ) {
i++;
print "{ collect2 -plugin " list[i] " ignored }";
continue
}
if ( list[i] ~ /-D__USE_MINGW_/ ) {
use_mingw=1
}