#include "token.h"
#include "listing.h"
-int errcnt; // Error count
-char * err_fname; // Name of error message file
+int errcnt; // Error count
+char * err_fname; // Name of error message file
-static char nl[] = "\n";
+static const char nl[] = "\n";
+static long unused; // For supressing 'write' warnings
//
//
int at_eol(void)
{
- if (*tok != EOL)
- error("syntax error");
+ char msg[256];
- return 0;
+ if (*tok != EOL)
+ {
+// error("syntax error");
+ sprintf(msg, "syntax error. expected EOL, found $%X ('%c')", *tok, *tok);
+ error(msg);
+ }
+
+ return 0;
}
//
// Cannot Create a File
//
-void cantcreat(char * fn)
+void cantcreat(const char * fn)
{
- printf("cannot create: '%s'\n", fn);
- exit(1);
+ printf("cannot create: '%s'\n", fn);
+ exit(1);
}
length = strlen(buf);
if (err_flag)
- write(err_fd, buf, length);
+ unused = write(err_fd, buf, length);
else
printf("%s", buf);
}
-int errors(char * s, char * s1)
+int errors(const char * s, char * s1)
{
char buf[EBUFSIZ];
char buf1[EBUFSIZ];
sprintf(buf1, "%s %d: Error: %s%s", curfname, curlineno, buf, nl);
if (err_flag)
- write(err_fd, buf1, (LONG)strlen(buf1));
+ unused = write(err_fd, buf1, (LONG)strlen(buf1));
else
printf("%s", buf1);
}
-int warn(char * s)
+int warn(const char * s)
{
char buf[EBUFSIZ];
sprintf(buf, "%s %d: Warning: %s%s", curfname, curlineno, s, nl);
if (err_flag)
- write(err_fd, buf, (LONG)strlen(buf));
+ unused = write(err_fd, buf, (LONG)strlen(buf));
else
printf("%s", buf);
}
-int warns(char * s, char * s1)
+int warns(const char * s, char * s1)
{
char buf[EBUFSIZ];
char buf1[EBUFSIZ];
sprintf(buf1, "%s %d: Warning: %s%s", curfname, curlineno, buf, nl);
if (err_flag)
- write(err_fd, buf1, (LONG)strlen(buf1));
+ unused = write(err_fd, buf1, (LONG)strlen(buf1));
else
printf("%s", buf1);
}
-int warni(char * s, unsigned i)
+int warni(const char * s, unsigned i)
{
char buf[EBUFSIZ];
char buf1[EBUFSIZ];
sprintf(buf1, "%s %d: Warning: %s%s", curfname, curlineno, buf, nl);
if (err_flag)
- write(err_fd, buf1, (LONG)strlen(buf1));
+ unused = write(err_fd, buf1, (LONG)strlen(buf1));
else
printf("%s", buf1);
}
-int fatal(char * s)
+int fatal(const char * s)
{
char buf[EBUFSIZ];
sprintf(buf, "%s %d: Fatal: %s%s", curfname, curlineno, s, nl);
if (err_flag)
- write(err_fd, buf, (LONG)strlen(buf));
+ unused = write(err_fd, buf, (LONG)strlen(buf));
else
printf("%s", buf);
ship_ln(buf);
if (err_flag)
- write(err_fd, buf, (LONG)strlen(buf));
+ unused = write(err_fd, buf, (LONG)strlen(buf));
else
printf("%s", buf);
exit(1);
}
+