@@ -26,7 +26,7 @@ int64_t MutilatedSymbol::_uid = 20;
26
26
// ParsedMacro::read_* : recursively convert the AST of the macro into a list of commands and populate structures
27
27
28
28
void ParsedMacro::read_num_lit (AST& tree) {
29
- DLANG_DEBUG_MSG (" read_num_lit\n " );
29
+ SCL_DEBUG_MSG (" read_num_lit\n " );
30
30
try { // try to parse int first
31
31
// sigh...
32
32
int64_t v;
@@ -64,7 +64,7 @@ void ParsedMacro::read_num_lit(AST& tree) {
64
64
}
65
65
66
66
void ParsedMacro::read_string_lit (AST& tree) {
67
- DLANG_DEBUG_MSG (" read_string_lit\n " );
67
+ SCL_DEBUG_MSG (" read_string_lit\n " );
68
68
69
69
// get string text
70
70
std::string v = tree.token .token ;
@@ -82,7 +82,7 @@ void ParsedMacro::read_string_lit(AST& tree) {
82
82
}
83
83
84
84
void ParsedMacro::read_dot_op (AST& tree) {
85
- DLANG_DEBUG_MSG (" read_dot_op" );
85
+ SCL_DEBUG_MSG (" read_dot_op" );
86
86
87
87
auto & obj = tree.members [0 ];
88
88
auto & mem = tree.members [1 ];
@@ -122,7 +122,7 @@ void ParsedMacro::read_index_op(AST& tree){
122
122
}
123
123
124
124
void ParsedMacro::read_decl (AST& tree) {
125
- DLANG_DEBUG_MSG (" read_decl\n " );
125
+ SCL_DEBUG_MSG (" read_decl\n " );
126
126
if (tree.members .empty ()) {
127
127
this ->errors .emplace_back (SemanticError (
128
128
" empty declaration" , tree.token .pos , this ->file_name ));
@@ -134,7 +134,7 @@ void ParsedMacro::read_decl(AST& tree) {
134
134
tree.members = tree.members [0 ].members ;
135
135
136
136
for (auto & d : tree.members ) {
137
- DLANG_DEBUG_MSG (" read_decl:" <<debug_AST (d) <<std::endl);
137
+ SCL_DEBUG_MSG (" read_decl:" << debug_AST (d) << std::endl);
138
138
if (d.type == AST::NodeType::IDENTIFIER) {
139
139
if (keyword_values.find (d.token .token ) != keyword_values.end ()) {
140
140
this ->errors .emplace_back (SemanticError (
@@ -155,7 +155,7 @@ void ParsedMacro::read_decl(AST& tree) {
155
155
const auto idid = this ->declare_id (d.members [0 ].token .token );
156
156
this ->body .emplace_back (Command (Command::OPCode::DECL_ID, idid));
157
157
this ->read_tree (d);
158
- DLANG_DEBUG_MSG (" read_decl: " << d.members [0 ].token .token <<" = " <<idid <<std::endl);
158
+ SCL_DEBUG_MSG (" read_decl: " << d.members [0 ].token .token << " = " << idid << std::endl);
159
159
} else {
160
160
this ->errors .emplace_back (SemanticError (
161
161
" invalid assignment, expected identifier, got: " + (
@@ -171,7 +171,7 @@ void ParsedMacro::read_decl(AST& tree) {
171
171
}
172
172
173
173
void ParsedMacro::read_id (AST& tree) {
174
- DLANG_DEBUG_MSG (" read_id\n " );
174
+ SCL_DEBUG_MSG (" read_id\n " );
175
175
176
176
if (tree.token .token == " true" ) {
177
177
this ->body .emplace_back (Command::OPCode::VAL_TRUE);
@@ -202,7 +202,7 @@ void ParsedMacro::read_id(AST& tree) {
202
202
203
203
//
204
204
void ParsedMacro::read_assignment (AST& t) {
205
- DLANG_DEBUG_MSG (" read_assignment\n " );
205
+ SCL_DEBUG_MSG (" read_assignment\n " );
206
206
207
207
// a = 123
208
208
if (t.members [0 ].type == AST::NodeType::IDENTIFIER) {
@@ -279,7 +279,7 @@ void ParsedMacro::read_assignment(AST& t) {
279
279
280
280
// operators defined only for convenience
281
281
void ParsedMacro::read_operation (AST& t){
282
- DLANG_DEBUG_MSG (" read_operation\n " );
282
+ SCL_DEBUG_MSG (" read_operation\n " );
283
283
// TODO: replace with actual operator ID's from VM
284
284
std::unordered_map<std::string, uint16_t > op_ids {
285
285
{ " +" , 0 },
@@ -320,7 +320,7 @@ void ParsedMacro::read_operation(AST& t){
320
320
}
321
321
322
322
void ParsedMacro::read_macro_invoke (AST& t) {
323
- DLANG_DEBUG_MSG (" read_macro_invoke\n " );
323
+ SCL_DEBUG_MSG (" read_macro_invoke\n " );
324
324
325
325
if (t.members .size () < 1 ) {
326
326
this ->errors .emplace_back (SemanticError (
@@ -345,7 +345,7 @@ void ParsedMacro::read_macro_invoke(AST& t) {
345
345
}
346
346
347
347
void ParsedMacro::read_macro_lit (AST& tree) {
348
- DLANG_DEBUG_MSG (" read_macro_lit\n " );
348
+ SCL_DEBUG_MSG (" read_macro_lit\n " );
349
349
350
350
// compile macro
351
351
std::vector<ParsedMacro*> pps = this ->parents ;
@@ -365,7 +365,7 @@ void ParsedMacro::read_macro_lit(AST& tree) {
365
365
}
366
366
367
367
void ParsedMacro::read_list_lit (AST& tree) {
368
- DLANG_DEBUG_MSG (" read_list_lit\n " );
368
+ SCL_DEBUG_MSG (" read_list_lit\n " );
369
369
// put elements onto stack
370
370
for (auto & m : tree.members )
371
371
read_tree (m);
@@ -374,7 +374,7 @@ void ParsedMacro::read_list_lit(AST& tree) {
374
374
}
375
375
376
376
void ParsedMacro::read_statements (AST& tree) {
377
- DLANG_DEBUG_MSG (" read_statements\n " );
377
+ SCL_DEBUG_MSG (" read_statements\n " );
378
378
for (AST& statement : tree.members ) {
379
379
read_tree (statement);
380
380
this ->body .emplace_back (Command (Command::OPCode::CLEAR_STACK));
@@ -387,7 +387,7 @@ void ParsedMacro::read_statements(AST& tree) {
387
387
}
388
388
389
389
void ParsedMacro::read_obj_lit (AST& tree) {
390
- DLANG_DEBUG_MSG (" read_obj_lit" );
390
+ SCL_DEBUG_MSG (" read_obj_lit" );
391
391
392
392
// Handle {}
393
393
if (tree.members .empty ()) {
@@ -412,7 +412,7 @@ void ParsedMacro::read_obj_lit(AST& tree) {
412
412
}
413
413
414
414
void ParsedMacro::read_tree (AST& tree) {
415
- DLANG_DEBUG_MSG (" read_tree: " <<tree.type_name () <<std::endl);
415
+ SCL_DEBUG_MSG (" read_tree: " << tree.type_name () << std::endl);
416
416
switch (tree.type ) {
417
417
case AST::NodeType::STATEMENTS:
418
418
read_statements (tree);
@@ -570,20 +570,20 @@ void Program::load_file(const std::string& fname) {
570
570
571
571
// std::cout <<"tokenizing...";
572
572
573
- DLANG_DEBUG_MSG (" tokenizing..." );
573
+ SCL_DEBUG_MSG (" tokenizing..." );
574
574
const auto toks = tokenize_stream (file);
575
- DLANG_DEBUG_MSG (" done\n " );
575
+ SCL_DEBUG_MSG (" done\n " );
576
576
577
577
578
- DLANG_DEBUG_MSG (" parsing..." );
578
+ SCL_DEBUG_MSG (" parsing..." );
579
579
// std::cout <<"parsing...";
580
580
AST main = parse (toks);
581
581
// std::cout <<"done\n";
582
- DLANG_DEBUG_MSG (" done\n " );
582
+ SCL_DEBUG_MSG (" done\n " );
583
583
584
584
// semantic analysis
585
585
std::vector<SemanticError> errs = process_tree (main, fname);
586
- DLANG_DEBUG_MSG (" After Semantics: " <<debug_AST (main) <<std::endl);
586
+ SCL_DEBUG_MSG (" After Semantics: " << debug_AST (main) << std::endl);
587
587
588
588
// implicit main macro
589
589
ParsedMacro entry (main, fname,
0 commit comments