You've already forked lazarus-ccr
server : TCP server implementatiion ( using synapse library ) in synapse_tcp_server.pas Delphi : first binary format support bugs fix in the WSDL generation for the server side git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@158 8e941d3f-bd1b-0410-a28a-d453659cc2b4
8 lines
175 B
PHP
8 lines
175 B
PHP
function wst_GetMem(Size : PtrInt) : Pointer;{$IFDEF USE_INLINE}inline;{$ENDIF}
|
|
begin
|
|
{$IFDEF FPC}
|
|
Result := GetMem(Size);
|
|
{$ELSE}
|
|
GetMem(Result,Size);
|
|
{$ENDIF}
|
|
end; |