PIKEVAR object foo;

[Marcus Comstedt (ACROSS) (Hail Ilpalazzo!) @ Pike (-) developers forum]

>  { if(THIS->foo)
>      free_object(THIS->foo);

You can use

    do_free_object(THIS->foo);

instead.