'$'==1, 'a'-'z'==2..27, 'A'-'Z'==28..53, '#'==54, catchall 55 */
| 388 | |
| 389 | /* '$'==1, 'a'-'z'==2..27, 'A'-'Z'==28..53, '#'==54, catchall 55 */ |
| 390 | staticfn int |
| 391 | invletter_value(char c) |
| 392 | { |
| 393 | return ('a' <= c && c <= 'z') ? (c - 'a' + 2) |
| 394 | : ('A' <= c && c <= 'Z') ? (c - 'A' + 2 + 26) |
| 395 | : (c == '$') ? 1 |
| 396 | : (c == '#') ? 1 + invlet_basic + 1 |
| 397 | : 1 + invlet_basic + 1 + 1; /* none of the above |
| 398 | * (shouldn't happen) */ |
| 399 | } |
| 400 | |
| 401 | /* qsort comparison routine for sortloot() */ |
| 402 | staticfn int QSORTCALLBACK |