
unit darius;
interface

{
  Automatically converted by H2Pas 1.0.0 from darius.h
  The following command line parameters were used:
    darius.h
}

{$IFDEF FPC}
{$PACKRECORDS C}
{$ENDIF}


  { was #define dname(params) para_def_expr }
  { argument types are unknown }

  function MEMNEXT(x : longint) : pMyStruct;  


implementation

  { was #define dname(params) para_def_expr }
  { argument types are unknown }
  function MEMNEXT(x : longint) : pMyStruct;
  begin
    MEMNEXT:=pMyStruct((pchar(x))-(pchar(@((pMyStruct(0))^.next))));
  end;


end.
