<html><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /></head><body style='font-size: 10pt; font-family: Arial,Helvetica,sans-serif'>
Hi all,<br /><br />Could someone suggest how to translate the following code to pascal?<br /><br />#define prev(X) ( *( (void **) ( ((void *) (X)) - 32 ) ) )<br />.....<br />prev(ptr) = prev(last);<br /><br />I tried converting the macro to an inline function but I get the error message: Error: Argument cannot be assigned to.<br /><br />The following does work but is a bit verbose. So therefore I would prefer a clean solution if possible. I never have used macro's in FPC, are they capable of doing the same as mentioned above?<br /><br />( ppointer ( (pointer (ptr)) - 32 ) )^ := ( ppointer ( (pointer (last)) - 32 ) )^;<br /><br />Thanks in advance!<br /><br />Regards, Darius
<div> </div>
</body></html>