{$MACRO ON}

{$DEFINE _CTASSERT(X,Y,Z):=assert(x=y,z);}

Begin
   _CTASSERT(1,1,'Constant failed.');
end.

_______________________________________________
fpc-devel maillist  -  [email protected]
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

Reply via email to