|
@@ -17,10 +17,10 @@ unit System;
|
|
|
|
|
|
interface
|
|
interface
|
|
|
|
|
|
|
|
+var
|
|
|
|
+ LineEnding: string = #10;
|
|
|
|
+ sLineBreak: string = #10;
|
|
const
|
|
const
|
|
- LineEnding = #10;
|
|
|
|
- sLineBreak = LineEnding;
|
|
|
|
-
|
|
|
|
MaxSmallint = 32767;
|
|
MaxSmallint = 32767;
|
|
MinSmallint = -32768;
|
|
MinSmallint = -32768;
|
|
MaxShortInt = 127;
|
|
MaxShortInt = 127;
|
|
@@ -206,6 +206,7 @@ function GUIDToString(const GUID: TGUID): string; external name 'rtl.guidrToStr'
|
|
var
|
|
var
|
|
ExitCode: Integer; external name 'rtl.exitcode';
|
|
ExitCode: Integer; external name 'rtl.exitcode';
|
|
IsConsole: Boolean = {$IFDEF NodeJS}true{$ELSE}false{$ENDIF};
|
|
IsConsole: Boolean = {$IFDEF NodeJS}true{$ELSE}false{$ENDIF};
|
|
|
|
+ FirstDotAtFileNameStartIsExtension : Boolean = False;
|
|
|
|
|
|
type
|
|
type
|
|
TOnParamCount = function: Longint;
|
|
TOnParamCount = function: Longint;
|