Il 06/01/2018 01:39, Darius Blaszyk ha scritto:
#define MEMNEXT(x) ((MyStruct *)(((char *) x) - ((char *) & (((MyStruct *)0)->next))))
h2pas translates it into the enclosed file. Hope that it helps. Giuliano
darius.pp
Description: application/wine-extension-pp
_______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal