77 static struct s_compunit *script, **cu_nextp = &script;  variable
229 		if (script == NULL) {  in cu_fgets()
235 		switch (script->type) {  in cu_fgets()
237 			if (strcmp(script->s, "-") == 0) {  in cu_fgets()
241 				if ((f = fopen(script->s, "r")) == NULL)  in cu_fgets()
242 				        err(1, "%s", script->s);  in cu_fgets()
243 				fname = script->s;  in cu_fgets()
249 			    sizeof(string_ident), "\"%s\"", script->s)) >=  in cu_fgets()
254 			s = script->s;  in cu_fgets()
258 			errx(1, "illegal script type: %d", script->type);  in cu_fgets()
269 		script = script->next;  in cu_fgets()
288 				if (s == script->s) {  in cu_fgets()
289 					script = script->next;  in cu_fgets()
292 					script = script->next;  in cu_fgets()