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

* Renamefest

Browse Source
This commit is contained in:
marco 2002-06-01 19:42:02 +00:00
parent 9c95811fc0
commit 4af59f4504
2 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
installer/install.pas
View File

@ -106,7 +106,7 @@ program install;
haside : boolean = false; haside : boolean = false;
hashtmlhelp : boolean = false; hashtmlhelp : boolean = false;
{$ifdef linux} {$ifdef Unix}
DirSep='/'; DirSep='/';
{$else} {$else}
DirSep='\'; DirSep='\';
@ -331,7 +331,7 @@ program install;
err:=false; err:=false;
{$I-} {$I-}
getdir(0,start); getdir(0,start);
{$ifndef linux} {$ifndef Unix}
if (s[2]=':') and (s[3]=DirSep) then if (s[2]=':') and (s[3]=DirSep) then
begin begin
chdir(Copy(s,1,3)); chdir(Copy(s,1,3));
@ -1256,7 +1256,7 @@ end;
c : word; c : word;
i,j : longint; i,j : longint;
found : boolean; found : boolean;
{$ifndef linux} {$ifndef Unix}
DSize,Space,ASpace : longint; DSize,Space,ASpace : longint;
S: DirStr; S: DirStr;
{$endif} {$endif}
@ -1920,7 +1920,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.9 2002-04-11 13:20:27 pierre Revision 1.10 2002-06-01 19:43:07 marco
* Renamefest
Revision 1.9 2002/04/11 13:20:27 pierre
+ several go32v2 related fixes + several go32v2 related fixes
Revision 1.8 2002/04/10 21:18:42 pierre Revision 1.8 2002/04/10 21:18:42 pierre

7
rtl/inc/graph/graph.inc
View File

@ -2276,7 +2276,7 @@ end;
procedure InitGraph(var GraphDriver:smallint;var GraphMode:smallint; procedure InitGraph(var GraphDriver:smallint;var GraphMode:smallint;
const PathToDriver:String); const PathToDriver:String);
const const
{$IFDEF Linux} {$IFDEF Unix}
dirchar = '/'; dirchar = '/';
{$ELSE} {$ELSE}
dirchar = '\'; dirchar = '\';
@ -2451,7 +2451,10 @@ begin
end; end;
{ {
$Log$ $Log$
Revision 1.6 2001-04-14 16:06:03 jonas Revision 1.7 2002-06-01 19:42:02 marco
* Renamefest
Revision 1.6 2001/04/14 16:06:03 jonas
* fixed problem with new modes system (reported by Vladimir Ravodin) (merged) * fixed problem with new modes system (reported by Vladimir Ravodin) (merged)
Revision 1.5 2000/12/07 17:19:47 jonas Revision 1.5 2000/12/07 17:19:47 jonas