paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-17 11:59:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

* o_creat added when o_append

Browse Source
This commit is contained in:
marco 2004-01-06 15:42:05 +00:00
parent 8c0e6c8943
commit e03e8b5a27
1 changed files with 5 additions and 2 deletions

7
rtl/bsd/osmain.inc
View File

@ -328,7 +328,7 @@ Begin
oflags:=oflags or (O_CREAT or O_TRUNC)
else
if (flags and $100)=$100 then
oflags:=oflags or (O_APPEND);
oflags:=oflags or (O_APPEND or O_CREAT);
{ empty name is special }
if p[0]=#0 then
begin
@ -593,7 +593,10 @@ end;
{
$Log$
Revision 1.11 2004-01-03 14:56:10 marco
Revision 1.12 2004-01-06 15:42:05 marco
* o_creat added when o_append
Revision 1.11 2004/01/03 14:56:10 marco
* typo fix
Revision 1.10 2004/01/03 12:35:39 marco