model_server/subsystem/src/autosubsys.cxx
//
// Creates a new group out of an objArr of entities.
// might need to return new name for "VALIDATE"
Creates a new group out of an objArr of entities.
might need to return new name for "VALIDATE"
Creates a new group out of an objArr of entities . might need to return new name for " VALIDATE "
void
make_subsystem(objArr *x) {
   Initialize(make_subsystem);
   if (!x->empty()) {
      char *name = make_subsystem_name();
      Log("make_subsystem: defining subsystem %s\n", name);
      symbolArr *arr = new symbolArr;
      extGroupApp::create(name, arr);
      Entity *e;
      Obj *el;
      ForEach(el, *x) {
	e = EntityPtr(el);
	arr->insert_last(e->get_xrefSymbol());
      }
      delete [] name;
   }
}
void make_subsystem ( objArr * x ) { Initialize ( make_subsystem ) ; if ( ! x -> empty ( ) ) { char * name = make_subsystem_name ( ) ; Log ( " \n " , name ) ; symbolArr * arr = new symbolArr ; extGroupApp :: create ( name , arr ) ; Entity * e ; Obj * el ; ForEach ( el , * x ) { e = EntityPtr ( el ) ; arr -> insert_last ( e -> get_xrefSymbol ( ) ) ; } delete [ ] name ; } }
Creates a new group out of an objArr of entities.
Creates a new group out of an objArr of entities .
//   ReturnValue(s); //  ReturnValue(NULL);