home *** CD-ROM | disk | FTP | other *** search
- /* [dodash.c of JUGPDS Vol.17] */
- /*
- *****************************************************************
- * *
- * Written by Hakuo Katayose (JUG-CP/M No.179) *
- * 49-114 Kawauchi-Sanjuunin-machi *
- * Sendai, Miyagi 980 *
- * Phone: 0222-61-3219 *
- * *
- * Modifird by Toshiya Oota (JUG-CPM No.10) *
- * Sakae ko-po 205 *
- * 5-19-6 Hosoda *
- * Katusikaku Tokyo 124 *
- * *
- * for MS-DOS Lattice C V3.1J & 80186/V20/V30 *
- * *
- * Compiler Option: -ccu -k0(1) -ms -n -v -w *
- * *
- * Edited & tested by Y. Monma (JUG-CP/M Disk Editor) *
- * & T. Ota (JUG-CP/M Sub Disk Editor) *
- * *
- *****************************************************************
- */
-
- /* Library functions for Software Tools */
-
- #include "stdio.h"
- #include "dos.h"
- #include "ctype.h"
- #include "tools.h"
-
- int cindex();
- void addset();
-
- /* dodash - expand array[i-1] -array[i+1] into set[j]...from valid */
- void dodash(valid, array, i, set, j, maxsiz)
- int *i, *j, maxsiz;
- char array[], set[], valid[];
- {
- int k, limit;
-
- (*i)++;
- (*j)--;
- limit = cindex(valid, esc(array, i));
- for (k = cindex(valid, set[*j]); k <= limit; k++)
- addset(valid[k], set, j, maxsiz);
- }