On Thu, 6 Nov 2003 23:31:27 +0100 (CET), you wrote:
>> * Minor difference with Delphi units:
>> * RaiseLastOSError is not defined in SysUtils.
>
>What is it supposed to do, specifically on non windows, or should it
>be windows only?
I had a look at Kylix's RaiseLastOSError function. It uses
GetLastError which calls '__errno_location' from 'libc.so.6'. On
Windows this uses the GetLastError WinAPI call.
This is Delphi's implementation for RaiseLastOSError:
procedure RaiseLastOSError;
var
LastError: Integer;
Error: EOSError;
begin
LastError := GetLastError;
if LastError <> 0 then
Error := EOSError.CreateResFmt(@SOSError, [LastError,
SysErrorMessage(LastError)])
else
Error := EOSError.CreateRes(@SUnkOSError);
Error.ErrorCode := LastError;
raise Error;
end;
>> * variables Win32Platform, Win32MajorVersion, etc. not defined in
>> SysUtils.
>
>Win32platform is already defined.
>
>I assume the "etc" are Win32MajorVersion, Win32MinorVersion,
>Win32BuildNumber and Win32CSDVersion? Added to windows version of SysUtils
>only (I assumed their contents also originate from getversionex)
Yes, the variables from GetVersionEx.
>Added. (all additions to CVS)
:-)
_______________________________________________
fpc-devel maillist - [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-devel
