8d7 < static const int prim = 2, prog = 1; /* input streams */ 957c956 < static const int ada = 64; --- > static const int ada = 94; 1651c1650 < selectinput (prog); /* closeoutput (); */ --- > closeoutput (); 2257c2256 < /* UOP: \ NOT */ --- > /* UOP: \ NOT */ 2554c2553 < if (global) { --- > { 2578,2584c2577,2580 < if (argc != 2) < exit (0); < openinput (prog, imp_concat (argv[1], ".i15")); < openoutput (obj, imp_concat (argv[1], ".o15")); < openoutput (map, imp_concat (argv[1], ".map")); < openinput (prim, "prim.i15"); < selectinput (prim); --- > selectinput (1); > > openoutput (obj, "temp.obj"); > openoutput (map, "temp.map"); 2594c2590 < /*assert(faulty == 0);*/ --- > assert (faulty == 0);