[Lazarus] semaphore

Mattias Gaertner nc-gaertnma at netcologne.de
Fri Feb 17 11:00:29 CET 2012


On Fri, 17 Feb 2012 10:21:50 +0100
Antonio Fortuny <a.fortuny at sitasoftware.lu> wrote:

> Hi again.
> 
> I've a problem with IDE (0.9.31 2011/12/05 Linux OpenSuse 12.1, FPC 
> 2.4.4, GTK-2:
> when double-click on the event name of a TButton in the object inspector 
> trying to generate the procedure event code, the unit "ipc" is open and 
> the error "/usr/share/fpcsrc/rtl/unix/ipc.pp(119,9) Error: expected 
> end., but seq found" is displayed in the errors window
> Same behaviour when hitting Ctrl+Space to end the code for a variable
> 
> This is the code snippet from ipc.pp tagged by the IDE
> 105     {$if not defined(linux_ipc32) and not defined(FPC_USE_LIBC)}
>              TIPC_Perm = record
>                  key   : TKey;
>                  uid   : kernel_uid_t;
>                  gid   : kernel_gid_t;
>                  cuid  : kernel_uid_t;
>                  cgid  : kernel_gid_t;
>                  mode  : kernel_mode_t;
>              {$if sizeof(kernel_mode_t) < 4}
> [114]            __pad1    : array[1..4-sizeof(mode_t)];
>              {$endif}
>              {$ifdef cpupowerpc}
>                      seq       : cuint;
>              {$else}
> [119]            seq       : cushort;
>              {$endif}
>                  __pad2    : cushort;
>                  __unused1 : culong;
>                  __unused2 : culong;
>            End;
> 
> Beside of this the IDE works well and compiled programs run as expected.
> But this really annoying. :-$

Array without type?
It's always amazing to find out what fpc supports.

svn trunk can now parse it.

Mattias




More information about the Lazarus mailing list