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

* get -g-l to work

Browse Source
This commit is contained in:
pierre 2000-04-10 11:36:19 +00:00
parent 8c3f6ef4f0
commit ed95777843
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/options.pas
View File

@ -582,7 +582,7 @@ begin
if UnsetBool(More, 0) then
begin
initmoduleswitches:=initmoduleswitches-[cs_debuginfo];
if (length(More)>1) and (More[1]='l') then
if (length(More)>1) and (More[2]='l') then
initglobalswitches:=initglobalswitches+[cs_gdb_lineinfo];
end
else
@ -1450,7 +1450,10 @@ end;
end.
{
$Log$
Revision 1.64 2000-04-07 14:56:18 peter
Revision 1.65 2000-04-10 11:36:19 pierre
* get -g-l to work
Revision 1.64 2000/04/07 14:56:18 peter
* correctfldcw define added
Revision 1.63 2000/04/05 21:57:34 pierre