1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
|
#ifndef PCC_LEXER_H
#define PCC_LEXER_H
#include <map>
#include "Node.hh"
#include "Parser.hh"
#define YY_DECL \
pcc::Parser::symbol_type yylex(pcc::Driver& driver, pcc::Context* context)
YY_DECL;
namespace pcc {
namespace Lexer {
char* GetUnescapedChar(char* s, char* end, char* out) {
static std::map<char, char> escape_map = {
{'\'', '\''}, {'?', '\?'}, {'\\', '\\'}, {'a', '\a'}, {'b', '\b'},
{'f', '\f'}, {'n', '\n'}, {'r', '\r'}, {'t', '\t'}, {'v', '\v'}};
if (s[0] != '\\') {
*out = s[0];
return s + 1;
} else if (s[1] == 'x') {
char c[3], *cend;
c[0] = s[2];
if (end - s > 3) {
c[1] = s[3];
c[2] = '\0';
} else {
c[1] = '\0';
}
*out = (char) std::strtol(c, &cend, 16);
return s + 2 + (cend - c);
} else if (s[1] >= '0' && s[1] <= '7') {
char c[4], *cend;
c[0] = s[1];
if (end - s > 4) {
c[1] = s[2];
c[2] = s[3];
c[3] = '\0';
} else if (end - s > 3) {
c[1] = s[2];
c[2] = '\0';
} else {
c[1] = '\0';
}
*out = (char) std::strtol(c, &cend, 8);
return s + 1 + (cend - c);
} else {
*out = escape_map[s[1]];
return s + 2;
}
}
Parser::symbol_type make_BOOLEAN_LITERAL(bool b, pcc::Context* context,
const Parser::location_type& loc) {
return Parser::make_BOOLEAN_LITERAL(
std::make_shared<BooleanLiteralNode>(context, b), loc);
}
Parser::symbol_type make_INTEGER_LITERAL(int v, pcc::Context* context,
const Parser::location_type& loc) {
return Parser::make_INTEGER_LITERAL(
std::make_shared<IntegerLiteralNode>(context, v), loc);
}
Parser::symbol_type make_REAL_LITERAL(float v, pcc::Context* context,
const Parser::location_type& loc) {
return Parser::make_REAL_LITERAL(
std::make_shared<RealLiteralNode>(context, v), loc);
}
Parser::symbol_type make_STRING_LITERAL(char* s, pcc::Context* context,
const Parser::location_type& loc) {
return Parser::make_STRING_LITERAL(
std::make_shared<StringLiteralNode>(context, s), loc);
}
} // namespace Lexer
} // namespace pcc
#endif // !PCC_LEXER_H
|
