void FinishDeferredSF (void) { if (deferSetFormula->lLength) { SortLists (deferSetFormula, &deferIsConstant); _SimpleList tcache; long iv, i = variableNames.Traverser (tcache,iv,variableNames.GetRoot()); for (; i >= 0; i = variableNames.Traverser (tcache,iv)) { _Variable* theV = FetchVar(i); if (theV->IsContainer()) { ((_VariableContainer*)theV)->SetMDependance (*deferSetFormula); } } for (long j = 0; j<likeFuncList.lLength; j++) if (((_String*)likeFuncNamesList(j))->sLength) { _LikelihoodFunction * lf = (_LikelihoodFunction*)likeFuncList(j); for (long k = 0; k < deferSetFormula->lLength; k++) { lf->UpdateIndependent(deferSetFormula->lData[k],deferIsConstant.lData[k]); } } } DeleteObject (deferSetFormula); deferSetFormula = nil; deferIsConstant.Clear(); }
ProcItemsEnumerator(ULONG theOptions) : myOptions(theOptions), myCurIndex(), myEffective(0) { if ( (myOptions & (ENUMOPTIONS_FOLDERS_ON_TOP|ENUMOPTIONS_FOLDERS_ON_BTM)) != 0) FillLists<true>(); else FillLists<false>(); if ( (myOptions & ENUMOPTIONS_SORT_ITEMS) != 0) SortLists(); MergeLists( (myOptions & ENUMOPTIONS_FOLDERS_ON_BTM) == 0); }
//__________________________________________________________________ void _HYSequencePane::AlphabetizeSpecies (void) { _List currentActiveNames; long k; for (k=0; k<speciesIndex.lLength; k++) currentActiveNames << rowHeaders (speciesIndex.lData[k]); SortLists (¤tActiveNames,&speciesIndex); BuildPane (); _MarkForUpdate(); }
void _HYObjectInspector::SortObjectsByName (long location) { _HYTable* table = (_HYTable*)GetCellObject (HY_OBJECT_INSPECTOR_TABLE_ROW,0); _List menuItems; menuItems.AppendNewInstance(new _String ("Ascending")); menuItems.AppendNewInstance(new _String ("Descending")); long h = table->_HandlePullDown (menuItems,(location&0xffff0000)>>16,location&0x0000ffff,0), k; if (h>=0) { menuItems.Clear(); _SimpleList index; for (k=0; k<table->verticalSpaces.lLength; k++) { index<<k; menuItems << table->GetCellData (0,k); } bool hasPadding = ((_String*)menuItems(menuItems.lLength-1))->sLength==0; if (hasPadding) { menuItems.Delete (menuItems.lLength-1); index.Delete (index.lLength-1); } SortLists (&menuItems, &index); if (h==1) { index.Flip(); } if (hasPadding) { index<<index.lLength; } table->SetRowOrder (index); } }