paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-10 16:06:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

* default optimization cpu changed to CLassPentium3

Browse Source
This commit is contained in:
peter 2004-10-10 15:42:22 +00:00
parent cf085fb9d0
commit 044ec56b56
1 changed files with 10 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
compiler/globals.pas
View File

@ -283,7 +283,7 @@ interface
procedure DefaultReplacements(var s:string);
{Gives the absolute path to the current directory}
function GetCurrentDir:string;
{Gives the relative path to the current directory,
{Gives the relative path to the current directory,
with a trailing dir separator. E. g. on unix ./ }
function CurDirRelPath(systeminfo: tsysteminfo): string;
function path_absolute(const s : string) : boolean;
@ -479,7 +479,7 @@ implementation
result:=CachedCurrentDir;
end;
{Gives the relative path to the current directory,
{Gives the relative path to the current directory,
with a trailing dir separator. E. g. on unix ./ }
function CurDirRelPath(systeminfo: tsysteminfo): string;
@ -489,7 +489,7 @@ implementation
else
CurDirRelPath:= ':'
end;
function path_absolute(const s : string) : boolean;
{
@ -1409,7 +1409,7 @@ implementation
{ later, this should be replaced by the math unit }
const
Default8087CW : word = $1332;
procedure Set8087CW(cw:word);assembler;
asm
movw cw,%ax
@ -1441,7 +1441,7 @@ implementation
{ later, this should be replaced by the math unit }
const
Default8087CW : word = $1332;
procedure Set8087CW(cw:word);assembler;
asm
movw cw,%ax
@ -1980,7 +1980,7 @@ implementation
{ might be overridden later }
initasmmode:=asmmode_standard;
{$ifdef i386}
initoptprocessor:=Class386;
initoptprocessor:=ClassPentium3;
initspecificoptprocessor:=Class386;
initfputype:=fpu_x87;
@ -2047,7 +2047,10 @@ implementation
end.
{
$Log$
Revision 1.142 2004-10-09 11:27:59 olle
Revision 1.143 2004-10-10 15:42:22 peter
* default optimization cpu changed to CLassPentium3
Revision 1.142 2004/10/09 11:27:59 olle
+ Added CurDirRelPath
* Exchanged hardcoded "./" to CurDirRelPath