comparison src/buildkeywordtab.c @ 139:5d4801c0566d

Get things building again with the updated tokenization scheme
author William Astle <lost@l-w.ca>
date Mon, 15 Jul 2024 23:26:15 -0600
parents ac183a519439
children
comparison
equal deleted inserted replaced
138:4983ba49f936 139:5d4801c0566d
32 for (tn1 = tn -> firstchild; tn1; tn1 = tn1 -> nextsibling) 32 for (tn1 = tn -> firstchild; tn1; tn1 = tn1 -> nextsibling)
33 { 33 {
34 // if there are child nodes, insert the sub tree 34 // if there are child nodes, insert the sub tree
35 if (tn1 -> firstchild) 35 if (tn1 -> firstchild)
36 { 36 {
37 fprintf(fp, " fcb 0x%02x,token_eot\n", tn1 -> ccode); 37 fprintf(fp, " fcb 0x%02x\n fdb token_eot\n", tn1 -> ccode);
38 if (tn1 -> toksym) 38 if (tn1 -> toksym)
39 { 39 {
40 print_tree(fp, tn1, tn1 -> toksym, 255); 40 print_tree(fp, tn1, tn1 -> toksym, 255);
41 } 41 }
42 else 42 else
52 } 52 }
53 } 53 }
54 // if there is also a terminal symbol here 54 // if there is also a terminal symbol here
55 if (tn1 -> toksym) 55 if (tn1 -> toksym)
56 { 56 {
57 fprintf(fp, " fcb 0x%02x,%s\n", tn1 -> ccode, tn1 -> toksym); 57 fprintf(fp, " fcb 0x%02x\n fdb %s\n", tn1 -> ccode, tn1 -> toksym);
58 } 58 }
59 } 59 }
60 // handle lookahead failure 60 // handle lookahead failure
61 if (lookahead) 61 if (lookahead)
62 { 62 {
63 fprintf(fp, " fcb 0x%02x,%s\n", lookaheaddepth, lookahead); 63 fprintf(fp, " fcb 0x%02x\n fdb %s\n", lookaheaddepth, lookahead);
64 } 64 }
65 65
66 fprintf(fp, "parse_wt%de\n", depth); 66 fprintf(fp, "parse_wt%de\n", depth);
67 } 67 }
68 68