[fpc-pascal] Unit initialization in dll initialization for arm/WinCE

[Sven Barth]

On 12.06.2012 18:27, Tomas Hajny wrote:
> On Tue, June 12, 2012 18:04, Sven Barth wrote:
>> Am 12.06.2012 15:20 schrieb "kyan"<alfasud.ti at gmail.com>:
>   .
>   .
>>> The problem is that function
>>> GetModuleName() is stubbed out in WinCE (and Linux):
>>>
>>> unit SysUtils.inc;
>>>
>>> function GetModuleName(Module: HMODULE): string;
>>> begin
>>> {$ifdef MSWINDOWS}
>>>   SetLength(Result,MAX_PATH);
>>>   SetLength(Result,GetModuleFileName(Module,
>> Pchar(Result),Length(Result)));
>>> {$ELSE}
>>>   Result:='';
>>> {$ENDIF}
>>> end;
>>>
>>> The function GetModuleFileName() exists (although it is unicode) in
>>> WinCE: http://msdn.microsoft.com/en-us/library/ms908441.aspx
>>>
>>> And from what I've found in the web a Linux implementation is possible
>>> using dladdr().
>>
>> If you want you can create a bug report. WinCE might likely be solved
>> then,
>> but I can't comment on Linux or other *nix systems.
>
> In any case, it's wrong that the implementation is placed in the platform
> independent include file instead of the respective sysutils.pp files. :-(

That can be corrected as well when support for Windows CE is added :D

Regards,
Sven