pnx/m16vm
1
0
Fork 0
mirror of https://github.com/pnx/m16vm synced 2026-06-18 04:00:02 +02:00
Code Releases Activity

asm: move grammar stuff from lexer.c to lexer/grammar.h

Browse source
This commit is contained in:
Henrik Hautakoski 2019-03-29 15:34:55 +01:00
parent 6611095364
commit caed36a936
No known key found for this signature in database
GPG key ID: 839F3A7EAFAEAFAA
2 changed files with 50 additions and 29 deletions
Download patch file Download diff file Expand all files Collapse all files

36
as/lexer.c
View file

@ -20,31 +20,9 @@
#include <stdio.h>
#include <string.h>
#include "asm_error.h"
#include "lexer/grammar.h"
#include "lexer.h"
/**
* macros for the grammar.
*/
// Numbers is defined as [0-9]
#define number(x) ((x) >= '0' && (x) <= '9')
// The first digit can however also contain '-'
#define first_number(x) (number(x) || (x) == '-' )
// First character in strings can be [a-z][A-Z] or '_'
#define first_string(x) \
( ((x) >= 'a' && (x) <= 'z') \
|| ((x) >= 'A' && (x) <= 'Z') \
|| (x) == '_' )
// All characters after can also include numbers or ':'
#define string(x) \
(first_string(x) || number(x))
#define space(x) ((x) == ' ' || (x) == '\t' || (x) == '\r')
struct opcode_ent {
char * name;
uint8_t code;
@ -82,7 +60,7 @@ static int read_next(struct lexer *lex) {
if (c == ';') {
comment = 1;
} else if (!space(c)) {
} else if (!lexer_is_space(c)) {
break;
}
}
@ -95,7 +73,7 @@ static int read_hex(FILE *fp, int *out) {
while((c = fgetc(fp)) != EOF) {
char n = 0;
if (number(c)) {
if (lexer_is_num(c)) {
n = c - '0';
}
else if ( (c >= 'a' && c <= 'f')
@ -124,7 +102,7 @@ static int read_dec(FILE *fp, int neg, int *out) {
int c, val = 0;
while((c = fgetc(fp)) != EOF) {
if (!number(c)) {
if (!lexer_is_num(c)) {
ungetc(c, fp);
break;
}
@ -188,7 +166,7 @@ static int read_string(FILE *fp, char *buf, size_t len) {
while((c = fgetc(fp)) != EOF && i < len) {
if (string(c)) {
if (lexer_is_string(c)) {
buf[i++] = c;
} else {
if (c == ':') {
@ -245,12 +223,12 @@ int lexer_get_next(struct lexer *lex) {
return -1;
break;
default:
if (first_number(ch)) {
if (lexer_is_num_start(ch)) {
ungetc(ch, lex->fp);
lex->token.type = TOKEN_NUMBER;
if (parse_number(lex) < 0)
return -1;
} else if (first_string(ch)) {
} else if (lexer_is_string_start(ch)) {
char buf[32];
ungetc(ch, lex->fp);
lex->token.type = read_string(lex->fp, buf, sizeof(buf));