mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-06-05 15:58:28 +02:00
* Rename fest II FCL version.
This commit is contained in:
marco
parent
ad6ba5dd70
commit
9669c1cad3
65
fcl/Makefile
65
fcl/Makefile
@ -1,5 +1,5 @@
|
|||||||
#
|
#
|
||||||
# Makefile generated by fpcmake v1.00 [2000/12/19]
|
# Makefile generated by fpcmake v1.00 [2000/12/23]
|
||||||
#
|
#
|
||||||
|
|
||||||
defaultrule: all
|
defaultrule: all
|
||||||
@ -153,7 +153,7 @@ endif
|
|||||||
|
|
||||||
# Targets
|
# Targets
|
||||||
|
|
||||||
override DIROBJECTS+=$(wildcard go32v2 linux win32 os2)
|
override DIROBJECTS+=$(wildcard go32v2 linux win32 os2 freebsd)
|
||||||
override EXAMPLEDIROBJECTS+=tests shedit/gtk
|
override EXAMPLEDIROBJECTS+=tests shedit/gtk
|
||||||
|
|
||||||
# Clean
|
# Clean
|
||||||
@ -623,6 +623,7 @@ OBJECTDIRGO32V2=1
|
|||||||
OBJECTDIRLINUX=1
|
OBJECTDIRLINUX=1
|
||||||
OBJECTDIRWIN32=1
|
OBJECTDIRWIN32=1
|
||||||
OBJECTDIROS2=1
|
OBJECTDIROS2=1
|
||||||
|
OBJECTDIRFREEBSD=1
|
||||||
|
|
||||||
# Dir go32v2
|
# Dir go32v2
|
||||||
|
|
||||||
@ -863,6 +864,66 @@ os2_require:
|
|||||||
os2_info:
|
os2_info:
|
||||||
$(MAKE) -C os2 info
|
$(MAKE) -C os2 info
|
||||||
endif
|
endif
|
||||||
|
|
||||||
|
# Dir freebsd
|
||||||
|
|
||||||
|
ifdef OBJECTDIRFREEBSD
|
||||||
|
.PHONY: freebsd_all freebsd_debug freebsd_examples freebsd_test freebsd_smart freebsd_shared freebsd_showinstall freebsd_install freebsd_sourceinstall freebsd_exampleinstall freebsd_zipinstall freebsd_zipsourceinstall freebsd_zipexampleinstall freebsd_clean freebsd_distclean freebsd_cleanall freebsd_require freebsd_info
|
||||||
|
|
||||||
|
freebsd_all:
|
||||||
|
$(MAKE) -C freebsd all
|
||||||
|
|
||||||
|
freebsd_debug:
|
||||||
|
$(MAKE) -C freebsd debug
|
||||||
|
|
||||||
|
freebsd_examples:
|
||||||
|
$(MAKE) -C freebsd examples
|
||||||
|
|
||||||
|
freebsd_test:
|
||||||
|
$(MAKE) -C freebsd test
|
||||||
|
|
||||||
|
freebsd_smart:
|
||||||
|
$(MAKE) -C freebsd smart
|
||||||
|
|
||||||
|
freebsd_shared:
|
||||||
|
$(MAKE) -C freebsd shared
|
||||||
|
|
||||||
|
freebsd_showinstall:
|
||||||
|
$(MAKE) -C freebsd showinstall
|
||||||
|
|
||||||
|
freebsd_install:
|
||||||
|
$(MAKE) -C freebsd install
|
||||||
|
|
||||||
|
freebsd_sourceinstall:
|
||||||
|
$(MAKE) -C freebsd sourceinstall
|
||||||
|
|
||||||
|
freebsd_exampleinstall:
|
||||||
|
$(MAKE) -C freebsd exampleinstall
|
||||||
|
|
||||||
|
freebsd_zipinstall:
|
||||||
|
$(MAKE) -C freebsd zipinstall
|
||||||
|
|
||||||
|
freebsd_zipsourceinstall:
|
||||||
|
$(MAKE) -C freebsd zipsourceinstall
|
||||||
|
|
||||||
|
freebsd_zipexampleinstall:
|
||||||
|
$(MAKE) -C freebsd zipexampleinstall
|
||||||
|
|
||||||
|
freebsd_clean:
|
||||||
|
$(MAKE) -C freebsd clean
|
||||||
|
|
||||||
|
freebsd_distclean:
|
||||||
|
$(MAKE) -C freebsd distclean
|
||||||
|
|
||||||
|
freebsd_cleanall:
|
||||||
|
$(MAKE) -C freebsd cleanall
|
||||||
|
|
||||||
|
freebsd_require:
|
||||||
|
$(MAKE) -C freebsd require
|
||||||
|
|
||||||
|
freebsd_info:
|
||||||
|
$(MAKE) -C freebsd info
|
||||||
|
endif
|
||||||
EXAMPLEDIRTESTS=1
|
EXAMPLEDIRTESTS=1
|
||||||
EXAMPLEDIRSHEDIT/GTK=1
|
EXAMPLEDIRSHEDIT/GTK=1
|
||||||
|
|
||||||
|
|||||||
@ -32,7 +32,7 @@ uses
|
|||||||
implementation
|
implementation
|
||||||
|
|
||||||
uses
|
uses
|
||||||
linux;
|
Unix;
|
||||||
|
|
||||||
{ OS - independent class implementations are in /inc directory. }
|
{ OS - independent class implementations are in /inc directory. }
|
||||||
{$i classes.inc}
|
{$i classes.inc}
|
||||||
@ -50,7 +50,10 @@ finalization
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.2 2000-10-26 22:30:21 peter
|
Revision 1.3 2001-01-21 20:45:09 marco
|
||||||
|
* Rename fest II FCL version.
|
||||||
|
|
||||||
|
Revision 1.2 2000/10/26 22:30:21 peter
|
||||||
* freebsd update
|
* freebsd update
|
||||||
* classes.rst
|
* classes.rst
|
||||||
|
|
||||||
|
|||||||
@ -14,7 +14,7 @@
|
|||||||
|
|
||||||
**********************************************************************}
|
**********************************************************************}
|
||||||
|
|
||||||
uses linux;
|
uses Unix;
|
||||||
|
|
||||||
Function TProcess.GetRunning : Boolean;
|
Function TProcess.GetRunning : Boolean;
|
||||||
|
|
||||||
@ -106,7 +106,10 @@ end;
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.2 2000-10-26 22:30:21 peter
|
Revision 1.3 2001-01-21 20:45:09 marco
|
||||||
|
* Rename fest II FCL version.
|
||||||
|
|
||||||
|
Revision 1.2 2000/10/26 22:30:21 peter
|
||||||
* freebsd update
|
* freebsd update
|
||||||
* classes.rst
|
* classes.rst
|
||||||
|
|
||||||
|
|||||||
@ -217,7 +217,7 @@ var
|
|||||||
P: Integer;
|
P: Integer;
|
||||||
I: TThreadPriority;
|
I: TThreadPriority;
|
||||||
begin
|
begin
|
||||||
P := Linux.GetPriority(Prio_Process,FHandle);
|
P := Unix.GetPriority(Prio_Process,FHandle);
|
||||||
Result := tpNormal;
|
Result := tpNormal;
|
||||||
for I := Low(TThreadPriority) to High(TThreadPriority) do
|
for I := Low(TThreadPriority) to High(TThreadPriority) do
|
||||||
if Priorities[I] = P then
|
if Priorities[I] = P then
|
||||||
@ -227,7 +227,7 @@ end;
|
|||||||
|
|
||||||
procedure TThread.SetPriority(Value: TThreadPriority);
|
procedure TThread.SetPriority(Value: TThreadPriority);
|
||||||
begin
|
begin
|
||||||
Linux.SetPriority(Prio_Process,FHandle, Priorities[Value]);
|
Unix.SetPriority(Prio_Process,FHandle, Priorities[Value]);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
@ -283,7 +283,10 @@ end;
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.2 2000-10-26 22:30:21 peter
|
Revision 1.3 2001-01-21 20:45:09 marco
|
||||||
|
* Rename fest II FCL version.
|
||||||
|
|
||||||
|
Revision 1.2 2000/10/26 22:30:21 peter
|
||||||
* freebsd update
|
* freebsd update
|
||||||
* classes.rst
|
* classes.rst
|
||||||
|
|
||||||
|
|||||||
@ -144,7 +144,7 @@ type
|
|||||||
|
|
||||||
Implementation
|
Implementation
|
||||||
|
|
||||||
uses inet,linux;
|
uses inet,Unix;
|
||||||
|
|
||||||
Const
|
Const
|
||||||
SocketWouldBlock = -2;
|
SocketWouldBlock = -2;
|
||||||
@ -497,7 +497,10 @@ end.
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.3 2000-11-17 13:40:53 sg
|
Revision 1.4 2001-01-21 20:45:09 marco
|
||||||
|
* Rename fest II FCL version.
|
||||||
|
|
||||||
|
Revision 1.3 2000/11/17 13:40:53 sg
|
||||||
* Fixed header and log section
|
* Fixed header and log section
|
||||||
|
|
||||||
Revision 1.2 2000/07/13 11:33:00 michael
|
Revision 1.2 2000/07/13 11:33:00 michael
|
||||||
|
|||||||
@ -32,7 +32,7 @@ uses
|
|||||||
implementation
|
implementation
|
||||||
|
|
||||||
uses
|
uses
|
||||||
linux;
|
Unix;
|
||||||
|
|
||||||
{ OS - independent class implementations are in /inc directory. }
|
{ OS - independent class implementations are in /inc directory. }
|
||||||
{$i classes.inc}
|
{$i classes.inc}
|
||||||
@ -50,7 +50,10 @@ finalization
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.2 2000-07-13 11:33:01 michael
|
Revision 1.3 2001-01-21 20:45:09 marco
|
||||||
|
* Rename fest II FCL version.
|
||||||
|
|
||||||
|
Revision 1.2 2000/07/13 11:33:01 michael
|
||||||
+ removed logs
|
+ removed logs
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|||||||
@ -14,7 +14,7 @@
|
|||||||
|
|
||||||
**********************************************************************}
|
**********************************************************************}
|
||||||
|
|
||||||
uses linux;
|
uses Unix;
|
||||||
|
|
||||||
Function TProcess.GetRunning : Boolean;
|
Function TProcess.GetRunning : Boolean;
|
||||||
|
|
||||||
@ -106,7 +106,10 @@ end;
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.2 2000-07-13 11:33:01 michael
|
Revision 1.3 2001-01-21 20:45:09 marco
|
||||||
|
* Rename fest II FCL version.
|
||||||
|
|
||||||
|
Revision 1.2 2000/07/13 11:33:01 michael
|
||||||
+ removed logs
|
+ removed logs
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|||||||
@ -217,7 +217,7 @@ var
|
|||||||
P: Integer;
|
P: Integer;
|
||||||
I: TThreadPriority;
|
I: TThreadPriority;
|
||||||
begin
|
begin
|
||||||
P := Linux.GetPriority(Prio_Process,FHandle);
|
P := Unix.GetPriority(Prio_Process,FHandle);
|
||||||
Result := tpNormal;
|
Result := tpNormal;
|
||||||
for I := Low(TThreadPriority) to High(TThreadPriority) do
|
for I := Low(TThreadPriority) to High(TThreadPriority) do
|
||||||
if Priorities[I] = P then
|
if Priorities[I] = P then
|
||||||
@ -227,7 +227,7 @@ end;
|
|||||||
|
|
||||||
procedure TThread.SetPriority(Value: TThreadPriority);
|
procedure TThread.SetPriority(Value: TThreadPriority);
|
||||||
begin
|
begin
|
||||||
Linux.SetPriority(Prio_Process,FHandle, Priorities[Value]);
|
Unix.SetPriority(Prio_Process,FHandle, Priorities[Value]);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
@ -283,7 +283,10 @@ end;
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.2 2000-07-13 11:33:01 michael
|
Revision 1.3 2001-01-21 20:45:09 marco
|
||||||
|
* Rename fest II FCL version.
|
||||||
|
|
||||||
|
Revision 1.2 2000/07/13 11:33:01 michael
|
||||||
+ removed logs
|
+ removed logs
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|||||||
@ -12,7 +12,7 @@
|
|||||||
|
|
||||||
**********************************************************************}
|
**********************************************************************}
|
||||||
|
|
||||||
uses linux,classes;
|
uses Unix,classes;
|
||||||
|
|
||||||
const
|
const
|
||||||
MaxHandle = SizeOf(TFDSet) * 8 - 1;
|
MaxHandle = SizeOf(TFDSet) * 8 - 1;
|
||||||
@ -25,7 +25,10 @@ Type
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.2 2000-10-26 22:30:21 peter
|
Revision 1.3 2001-01-21 20:45:09 marco
|
||||||
|
* Rename fest II FCL version.
|
||||||
|
|
||||||
|
Revision 1.2 2000/10/26 22:30:21 peter
|
||||||
* freebsd update
|
* freebsd update
|
||||||
* classes.rst
|
* classes.rst
|
||||||
|
|
||||||
|
|||||||
@ -13,7 +13,7 @@
|
|||||||
**********************************************************************}
|
**********************************************************************}
|
||||||
|
|
||||||
|
|
||||||
Uses Linux;
|
Uses Unix;
|
||||||
|
|
||||||
{ Declared EXPLICITLY with Ansistring, so NO mistaking is possible }
|
{ Declared EXPLICITLY with Ansistring, so NO mistaking is possible }
|
||||||
|
|
||||||
@ -23,7 +23,7 @@ Var P : Pchar;
|
|||||||
|
|
||||||
begin
|
begin
|
||||||
// Linux version returns pchar.
|
// Linux version returns pchar.
|
||||||
p:=linux.getenv(EnvVar);
|
p:=Unix.getenv(EnvVar);
|
||||||
if P<>nil then
|
if P<>nil then
|
||||||
getenv:=strpas(p)
|
getenv:=strpas(p)
|
||||||
else
|
else
|
||||||
@ -32,7 +32,10 @@ end;
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.2 2000-10-26 22:30:21 peter
|
Revision 1.3 2001-01-21 20:45:09 marco
|
||||||
|
* Rename fest II FCL version.
|
||||||
|
|
||||||
|
Revision 1.2 2000/10/26 22:30:21 peter
|
||||||
* freebsd update
|
* freebsd update
|
||||||
* classes.rst
|
* classes.rst
|
||||||
|
|
||||||
|
|||||||
@ -14,7 +14,7 @@
|
|||||||
|
|
||||||
**********************************************************************}
|
**********************************************************************}
|
||||||
|
|
||||||
uses linux;
|
uses Unix;
|
||||||
|
|
||||||
Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
|
Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
|
||||||
|
|
||||||
@ -24,7 +24,10 @@ end;
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.2 2000-10-26 22:30:21 peter
|
Revision 1.3 2001-01-21 20:45:09 marco
|
||||||
|
* Rename fest II FCL version.
|
||||||
|
|
||||||
|
Revision 1.2 2000/10/26 22:30:21 peter
|
||||||
* freebsd update
|
* freebsd update
|
||||||
* classes.rst
|
* classes.rst
|
||||||
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user