void report_error( /* ARGUMENTS */ int error_code, /* the code number of the error message */ int print_stack) /* print stack if ON, otherwise not */ { char buffer[RS274NGC_TEXT_SIZE]; int k; rs274ngc_error_text(error_code, buffer, sizeof(buffer), 5); /* for coverage of code */ rs274ngc_error_text(error_code, buffer, sizeof(buffer), RS274NGC_TEXT_SIZE); fprintf(stderr, "%s\n", ((buffer[0] IS 0) ? "Unknown error, bad error code" : buffer)); rs274ngc_line_text(buffer, RS274NGC_TEXT_SIZE); fprintf(stderr, "%s\n", buffer); if (print_stack IS ON) { for (k SET_TO 0; ; k++) { rs274ngc_stack_name(k, buffer, RS274NGC_TEXT_SIZE); if (buffer[0] ISNT 0) fprintf(stderr, "%s\n", buffer); else break; } } }
void print_nc_line_number() { char text[256]; int k; int m; rs274ngc_line_text(text, 256); for (k SET_TO 0; ((k < 256) AND ((text[k] IS '\t') OR (text[k] IS ' ') OR (text[k] IS '/'))); k++); if ((k < 256) AND ((text[k] IS 'n') OR (text[k] IS 'N'))) { fputc('N', _outfile); for (k++, m SET_TO 0; ((k < 256) AND (text[k] >= '0') AND (text[k] <= '9')); k++, m++) fputc(text[k], _outfile); for (; m < 6; m++) fputc(' ', _outfile); } else if (k < 256) fprintf(_outfile, "N..... "); }