_PATH_DEFTAPE
arcname = _PATH_DEFTAPE;
tape = _PATH_DEFTAPE;
inputdev = _PATH_DEFTAPE;
input = open_arg(_PATH_DEFTAPE, H_INPUT, 0);