|
@@ -545,8 +545,12 @@ begin
|
|
|
SysInitFPU;
|
|
|
{ To be set if this is a GUI or console application }
|
|
|
IsConsole := TRUE;
|
|
|
+{$ifdef FPC_HAS_FEATURE_DYNLIBS}
|
|
|
+ { If dynlibs feature is disabled,
|
|
|
+ IsLibrary is a constant, which can thus not be set to a value }
|
|
|
{ To be set if this is a library and not a program }
|
|
|
IsLibrary := FALSE;
|
|
|
+{$endif def FPC_HAS_FEATURE_DYNLIBS}
|
|
|
{ Setup heap }
|
|
|
InitDosHeap;
|
|
|
SysInitExceptions;
|