| 1288 | // the argument list and set all the program modes and charts to display. |
| 1289 | |
| 1290 | flag FProcessSwitches(int argc, char **argv) |
| 1291 | { |
| 1292 | int ich, i, j, k; |
| 1293 | flag fNot, fOr, fAnd; |
| 1294 | real rT; |
| 1295 | char ch1, ch2, *pch; |
| 1296 | CI ci; |
| 1297 | #ifdef EXPRESS |
| 1298 | char **ppch; |
| 1299 | #endif |
| 1300 | |
| 1301 | argc--; argv++; |
| 1302 | while (argc) { |
| 1303 | ch1 = argv[0][0]; |
| 1304 | fNot = fOr = fAnd = fFalse; |
| 1305 | switch (ch1) { |
| 1306 | case '=': fOr = fTrue; break; |
| 1307 | case '_': fAnd = fTrue; break; |
| 1308 | case ':': break; |
| 1309 | default: fNot = fTrue; break; |
| 1310 | } |
| 1311 | ich = 1 + FChSwitch(ch1); // Leading dash? |
| 1312 | ch1 = argv[0][ich]; |
| 1313 | ch2 = (ch1 == chNull ? chNull : argv[0][ich+1]); |
| 1314 | switch (argv[0][ich-1]) { |
| 1315 | |
| 1316 | case 'H': |
| 1317 | if (ch1 == 'c') |
| 1318 | SwitchF(us.fCredit); |
| 1319 | else if (ch1 == 'Y') |
| 1320 | SwitchF(us.fSwitchRare); |
| 1321 | #ifdef ISG |
| 1322 | else if (ch1 == 'X') |
| 1323 | SwitchF(us.fKeyGraph); |
| 1324 | #endif |
| 1325 | else if (ch1 == 'C') |
| 1326 | SwitchF(us.fSign); |
| 1327 | else if (ch1 == 'O') |
| 1328 | SwitchF(us.fObject); |
| 1329 | else if (ch1 == 'A') |
| 1330 | SwitchF(us.fAspect); |
| 1331 | else if (ch1 == 'F') |
| 1332 | SwitchF(us.fConstel); |
| 1333 | else if (ch1 == 'S') |
| 1334 | SwitchF(us.fOrbitData); |
| 1335 | else if (ch1 == '7') |
| 1336 | SwitchF(us.fRay); |
| 1337 | else if (ch1 == 'I') |
| 1338 | SwitchF(us.fMeaning); |
| 1339 | else if (ch1 == 'e') { |
| 1340 | SwitchF(us.fCredit); SwitchF(us.fSwitch); SwitchF(us.fSwitchRare); |
| 1341 | SwitchF(us.fKeyGraph); SwitchF(us.fSign); SwitchF(us.fObject); |
| 1342 | SwitchF(us.fAspect); SwitchF(us.fConstel); SwitchF(us.fOrbitData); |
| 1343 | SwitchF(us.fRay); SwitchF(us.fMeaning); |
| 1344 | } else |
| 1345 | SwitchF(us.fSwitch); |
| 1346 | break; |
| 1347 |
no test coverage detected