#include <suifkernel/utilities.h>
list<ProcedureSymbol*>* sym_list = collect_object<ProcedureSymbol>(root); for (list<ProcedureSymbol*>::iterator iter = sym_list->begin(); iter != sym_list->end(); iter++) { ProcedureSymbol *ps = *iter; // do something with the procedure symbol } // clean up delete sym_list;
written by Dimitri van Heesch, © 1997-1999