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

+ Dw switch now does something.

Browse Source
This commit is contained in:
daniel 1999-09-15 20:24:56 +00:00
parent 47b7b2d321
commit 2d925677e5
2 changed files with 15 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/link.pas
View File

@ -638,6 +638,12 @@ begin
Replace (S, '$STRIP', Target_Link.StripOpt)
else
Replace (S, '$STRIP', '');
{This is a hack. But I don't think other platforms have a presenation
manager, so it should work. (DM)}
if usewindowapi then
replace (s, '$PM',' -p')
else
replace (s, '$PM','');
if utilsdirectory<>'' then
begin
bindbin:=Search(target_link.bindbin[ii]+source_os.exeext,
@ -779,7 +785,10 @@ end;
end.
{
$Log$
Revision 1.68 1999-08-18 17:05:53 florian
Revision 1.69 1999-09-15 20:24:56 daniel
+ Dw switch now does something.
Revision 1.68 1999/08/18 17:05:53 florian
+ implemented initilizing of data for the new code generator
so it should compile now simple programs

7
compiler/systems.pas
View File

@ -912,7 +912,7 @@ implementation
linkcmd : '-o $EXE @$RES';
binders : 1;
bindbin : ('emxbind','');
bindcmd : ('-b $STRIP -k$STACKKB -h$HEAPMB -o $EXE.exe $EXE -aim -s$DOSHEAPKB',
bindcmd : ('-b $STRIP$PM -k$STACKKB -h$HEAPMB -o $EXE.exe $EXE -aim -s$DOSHEAPKB',
'');
stripopt : '-s';
stripbind : true;
@ -1734,7 +1734,10 @@ begin
end.
{
$Log$
Revision 1.92 1999-09-07 15:02:41 pierre
Revision 1.93 1999-09-15 20:24:56 daniel
+ Dw switch now does something.
Revision 1.92 1999/09/07 15:02:41 pierre
* powerpc default was alpha !!
Revision 1.91 1999/08/16 15:35:29 pierre