misc.c

#include "defs.h"
#include "data.h"
#include "decl.h"

void match(int t, char *what) {
    if (Token.token == t) {
        scan(&Token);
    } else {
        fatals("Expected", what);
    }
}

void ident(void) {
    match(T_IDENT, "identifier");
}

void semi(void) {
    match(T_SEMI, ";");
}

void lbrace(void) {
    match(T_LBRACE, "{");
}

void rbrace(void) {
    match(T_RBRACE, "}");
}

void lparen(void) {
    match(T_LPAREN, "(");
}

void rparen(void) {
    match(T_RPAREN, ")");
}

void comma(void) {
    match(T_COMMA, ",");
}

void warn(char *s) {
    fprintf(stderr, "[Warning]: %s on line %d of %s\n", s, Line, Infilename);
}

void fatal(char *s) {
    fprintf(stderr, "[Error]: %s on line %d of %s\n", s, Line, Infilename);
    fclose(Outfile);
    unlink(Outfilename);
    exit(1);
}

void fatals(char *s1, char *s2) {
    fprintf(stderr, "[Error]: %s: '%s' on line %d of %s\n", s1, s2, Line, Infilename);
    fclose(Outfile);
    unlink(Outfilename);
    exit(1);
}

void fatald(char *s, int d) {
    fprintf(stderr, "[Error]: %s: '%d' on line %d of %s\n", s, d, Line, Infilename);
    fclose(Outfile);
    unlink(Outfilename);
    exit(1);
}

void fatalc(char *s, int c) {
    fprintf(stderr, "[Error]: %s: '%c' on line %d of %s\n", s, c, Line, Infilename);
    fclose(Outfile);
    unlink(Outfilename);
    exit(1);
}