vsnprintf(buf, sizeof(buf)-1, format, arglist);
va_end(arglist);
fprintf(stderr, "%s:%d:%d: error: %s\n", current_filename, current_line, current_column, buf);
vsnprintf(buf, sizeof(buf)-1, format, arglist);
va_end(arglist);
fprintf(stderr, "%s:%d:%d: error: %s\n", current_filename, current_line, current_column, buf);