STUNPUTC
STUNPUTC(new);
while (new > stackblock() && (STUNPUTC(new), *new) != '/');
STUNPUTC(expdest); /* delete the final \0 */
STUNPUTC(expdest);