paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-01 15:10:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

Only consider -l option if -l is at start of argument

Browse Source 
git-svn-id: trunk@22862 -
This commit is contained in:
pierre 2012-10-27 21:58:24 +00:00
parent 1ecc2672bb
commit 3915b8e7f9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -279,7 +279,7 @@ BEGIN {
print dynamiclib;
print librarypath;
}
if ( list[i] ~ /-l/ ) {
if ( list[i] ~ /^-l/ ) {
systemlib = gensub (/-l([^ ]*)/,"\\1","g",list[i]);
if (forcestatic == 1) {
systemlib="lib" systemlib ".a"