paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 02:49:22 +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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

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