Cross Reference: /ast/src/cmd/jcl/cpy2dss.c

Lines Matching defs:errorf
88 #define cpyinit(d,e)	(memset(d,0,sizeof(Cpydisc_t)),(d)->version=CPY_VERSION,(d)->errorf=(Error_f)(e))
131 	Error_f		errorf;
189 		if (disc->errorf)
190 			(*disc->errorf)(cpy, disc, ERROR_SYSTEM|2, "out of space");
325 		if (cpy->disc->errorf)
326 			(*cpy->disc->errorf)(cpy, cpy->disc, 2, "%s: syntax error: level number expected", s);
333 		if (cpy->disc->errorf)
334 			(*cpy->disc->errorf)(cpy, cpy->disc, ERROR_SYSTEM|2, "out of space");
373 					if (cpy->disc->errorf)
374 						(*cpy->disc->errorf)(cpy, cpy->disc, 2, "%s: syntax error: COMP number in range 1..9 expected", s);
386 				if (cpy->disc->errorf)
387 					(*cpy->disc->errorf)(cpy, cpy->disc, 2, "%s: syntax error: ON expected", s);
396 					if (cpy->disc->errorf)
397 						(*cpy->disc->errorf)(cpy, cpy->disc, ERROR_SYSTEM|2, "out of space");
407 					if (cpy->disc->errorf)
408 						(*cpy->disc->errorf)(cpy, cpy->disc, 2, "%s: internal error: dup not found", s);
420 				if (cpy->disc->errorf)
421 					(*cpy->disc->errorf)(cpy, cpy->disc, 2, "%s: syntax error: BY expected", s);
436 				if (cpy->disc->errorf)
437 					(*cpy->disc->errorf)(cpy, cpy->disc, 2, "%s: syntax error: minimum OCCURS number expected", s);
449 					if (cpy->disc->errorf)
450 						(*cpy->disc->errorf)(cpy, cpy->disc, 2, "%s: syntax error: maximum OCCURS number expected", s);
511 					if (cpy->disc->errorf)
512 						(*cpy->disc->errorf)(cpy, cpy->disc, 2, "%s: unknown PIC", s - 1);
536 				if (cpy->disc->errorf)
537 					(*cpy->disc->errorf)(cpy, cpy->disc, 2, "redefined member name expected");
545 				if (cpy->disc->errorf)
546 					(*cpy->disc->errorf)(cpy, cpy->disc, 2, "%s: unknown member", s);
560 		else if (cpy->disc->errorf)
561 			(*cpy->disc->errorf)(cpy, cpy->disc, 1, "%s: unknown attribute", s);
776 					if (disc->errorf)
777 						(*disc->errorf)(cpy, disc, 2, "%s: empty struct", field->name);
784 					if (disc->errorf)
785 						(*disc->errorf)(cpy, disc, 2, "%s: nesting too deep", field->name);
987 	cpyinit(&disc, errorf);