mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 20:29:32 +02:00
* Made compilable again (missing bracket at the begin of logs)
This commit is contained in:
parent
c08c5ceab8
commit
f96959fafd
@ -1,3 +1,19 @@
|
||||
{
|
||||
$Id$
|
||||
This file is part of the Free Component Library (FCL)
|
||||
Copyright (c) 1999-2000 by Michael Van Canneyt and Florian Klaempfl
|
||||
|
||||
Classes unit for OS/2
|
||||
|
||||
See the file COPYING.FPC, included in this distribution,
|
||||
for details about the copyright.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
Uses Dos;
|
||||
|
||||
{ Declared EXPLICITLY with Ansistring, so NO mistaking is possible }
|
||||
@ -7,8 +23,12 @@ Function Getenv (Var EnvVar : AnsiString): AnsiString;
|
||||
begin
|
||||
Result:=Dos.Getenv(EnvVar);
|
||||
end;
|
||||
{
|
||||
$Log$
|
||||
Revision 1.2 2000-07-13 11:33:01 michael
|
||||
Revision 1.3 2000-08-25 17:33:44 hajny
|
||||
* Made compilable again (missing bracket at the begin of logs)
|
||||
|
||||
Revision 1.2 2000/07/13 11:33:01 michael
|
||||
+ removed logs
|
||||
|
||||
}
|
||||
|
@ -19,8 +19,12 @@ Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
|
||||
begin
|
||||
CreatePipeHandles := DosCreatePipe (InHandle, OutHandle, PipeBufSize) = 0;
|
||||
end;
|
||||
{
|
||||
$Log$
|
||||
Revision 1.2 2000-07-13 11:33:01 michael
|
||||
Revision 1.3 2000-08-25 17:33:44 hajny
|
||||
* Made compilable again (missing bracket at the begin of logs)
|
||||
|
||||
Revision 1.2 2000/07/13 11:33:01 michael
|
||||
+ removed logs
|
||||
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user