hedgewars/uFLTypes.pas
branchqmlfrontend
changeset 11452 78860824b5a5
parent 11451 6e9b12864856
child 11460 9f2fb0031ef0
equal deleted inserted replaced
11451:6e9b12864856 11452:78860824b5a5
    22     PIPCMessage = ^TIPCMessage;
    22     PIPCMessage = ^TIPCMessage;
    23     TIPCMessage = record
    23     TIPCMessage = record
    24                    str: shortstring;
    24                    str: shortstring;
    25                    len: Longword;
    25                    len: Longword;
    26                    buf: Pointer;
    26                    buf: Pointer;
       
    27                    barrier: Longword;
    27                    next: PIPCMessage;
    28                    next: PIPCMessage;
    28                end;
    29                end;
    29     PIPCQueue = ^TIPCQueue;
    30     PIPCQueue = ^TIPCQueue;
    30     TIPCQueue = record
    31     TIPCQueue = record
    31                    msg: TIPCMessage;
    32                    msg: TIPCMessage;