/**************************************************************************
 *
 * AESFAST PD utilties.
 *
 *  Resource-related utilities 3...
 *   rsc_treefix
 *************************************************************************/

#include <gemfast.h>

/*-------------------------------------------------------------------------
 * rsc_treefix - Do object x/y fixup for all objects in a tree.
 *-----------------------------------------------------------------------*/

void
rsc_treefix(ptree)
    register OBJECT *ptree;
{
    register int    objcounter;

    objcounter = -1;
    do  {
        objcounter++;
        rsrc_obfix(ptree, objcounter);
    } while (!(ptree[objcounter].ob_flags & LASTOB));
}