abend("Memory size too large (use /m option)\n");
addext(filename, ".ccd");
abend("Memory size too large (use /m option)\n");
addext(filename, ".ccd");
if ((fp = fopen(filename, BINARYREAD)) == NULL) {
fprintf(stderr, "Cannot open .ccd file\n");
endrun(10);
if ((fp = fopen(filename, BINARYREAD)) == NULL) {
fprintf(stderr, "Cannot open .ccd file\n");
endrun(10);
/* Read prototypes from .pcd file */
addext(filename, ".pcd");
/* Read prototypes from .pcd file */
addext(filename, ".pcd");
if ((fp = fopen(filename, BINARYREAD)) == NULL) {
fprintf(stderr,"Cannot open .pcd file\n");
endrun(10);
if ((fp = fopen(filename, BINARYREAD)) == NULL) {
fprintf(stderr,"Cannot open .pcd file\n");
endrun(10);