Mercurial > projects > dil

annotate trunk/src/cmd/Generate.d @ 668:a1f8d8f2db38

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Renamed some identifiers.
author Aziz K?ksal <aziz.koeksal@gmail.com>
date Thu, 17 Jan 2008 19:27:46 +0100
parents c37d25d661af
children ff6971637f88
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
1 /++
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
2 Author: Aziz Köksal
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
3 License: GPL3
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
4 +/
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
5 module cmd.Generate;
578
c769bc239006 Moved Parser.d to new package 'parser'.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 576
diff changeset
6
580
fa6d3c52757d Moved SyntaxTree.d to new package 'ast'.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 578
diff changeset
7 import dil.ast.Node;
596
39fac5531b85 Moved dil.Token to dil.lexer.Token.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 582
diff changeset
8 import dil.lexer.Lexer;
578
c769bc239006 Moved Parser.d to new package 'parser'.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 576
diff changeset
9 import dil.parser.Parser;
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
10 import dil.File;
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
11 import tango.io.Print;
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
12 import common;
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
13
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
14 /// Options for the generate command.
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
15 enum DocOption
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
16 {
392
bb935c6f9b7a Applied fixes and improvements to the Lexer class.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 391
diff changeset
17 Empty,
bb935c6f9b7a Applied fixes and improvements to the Lexer class.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 391
diff changeset
18 Tokens = 1,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
19 Syntax = 1<<1,
392
bb935c6f9b7a Applied fixes and improvements to the Lexer class.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 391
diff changeset
20 HTML = 1<<2,
bb935c6f9b7a Applied fixes and improvements to the Lexer class.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 391
diff changeset
21 XML = 1<<3
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
22 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
23
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
24 /// Executes the command.
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
25 void execute(string filePath, DocOption options)
364
1059295c2727 - Every command module has an execute method now.
aziz
parents: 363
diff changeset
26 {
392
bb935c6f9b7a Applied fixes and improvements to the Lexer class.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 391
diff changeset
27 assert(options != DocOption.Empty);
364
1059295c2727 - Every command module has an execute method now.
aziz
parents: 363
diff changeset
28 if (options & DocOption.Syntax)
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
29 syntaxToDoc(filePath, Stdout, options);
364
1059295c2727 - Every command module has an execute method now.
aziz
parents: 363
diff changeset
30 else
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
31 tokensToDoc(filePath, Stdout, options);
364
1059295c2727 - Every command module has an execute method now.
aziz
parents: 363
diff changeset
32 }
1059295c2727 - Every command module has an execute method now.
aziz
parents: 363
diff changeset
33
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
34 /// Escapes the characters '<', '>' and '&' with named character entities.
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
35 char[] xml_escape(char[] text)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
36 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
37 char[] result;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
38 foreach(c; text)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
39 switch(c)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
40 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
41 case '<': result ~= "&lt;"; break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
42 case '>': result ~= "&gt;"; break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
43 case '&': result ~= "&amp;"; break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
44 default: result ~= c;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
45 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
46 return result;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
47 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
48
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
49
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
50 /// Find object in subject and return position.
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
51 /// Returns -1 if no match was found.
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
52 /+int find(char[] subject, char[] object)
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
53 {
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
54 if (object.length > subject.length)
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
55 return -1;
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
56 foreach (i, c; subject)
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
57 {
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
58 if (c == object[0])
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
59 {
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
60 if (object.length > (subject.length - i))
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
61 return -1;
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
62 if (object == subject[i..i+object.length])
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
63 return i;
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
64 }
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
65 }
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
66 return -1;
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
67 }+/
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
68
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
69 /++
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
70 Find the last occurrence of object in subject.
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
71 Returns the index if found, or -1 if not.
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
72 +/
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
73 int rfind(char[] subject, char object)
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
74 {
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
75 foreach_reverse(i, c; subject)
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
76 if (c == object)
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
77 return i;
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
78 return -1;
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
79 }
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
80
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
81 /// Returns the short class name of an instance descending from Node.
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
82 char[] getShortClassName(Node node)
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
83 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
84 static char[][] name_table;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
85 if (name_table is null)
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
86 name_table = new char[][NodeKind.max+1]; // Create a new table.
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
87 // Look up in table.
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
88 char[] name = name_table[node.kind];
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
89 if (name !is null)
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
90 return name; // Return cached name.
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
91
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
92 name = node.classinfo.name; // Get the fully qualified name of the class.
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
93 name = name[rfind(name, '.')+1 .. $]; // Remove package and module name.
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
94
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
95 uint suffixLength;
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
96 switch (node.category)
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
97 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
98 alias NodeCategory NC;
485
ea8c7459f1c4 Changed a lot of things in the Lexer.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 422
diff changeset
99 case NC.Declaration:
661
c37d25d661af Fixed getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 640
diff changeset
100 if (node.kind == NodeKind.Declarations ||
c37d25d661af Fixed getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 640
diff changeset
101 node.kind == NodeKind.EnumMember)
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
102 break;
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
103 suffixLength = "Declaration".length;
485
ea8c7459f1c4 Changed a lot of things in the Lexer.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 422
diff changeset
104 break;
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
105 case NC.Statement:
640
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
106 switch (node.kind)
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
107 {
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
108 case NodeKind.Statements,
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
109 NodeKind.CatchBody,
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
110 NodeKind.FinallyBody,
661
c37d25d661af Fixed getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 640
diff changeset
111 NodeKind.FunctionBody,
640
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
112 NodeKind.AsmInstruction,
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
113 NodeKind.IllegalAsmInstruction:
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
114 break;
640
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
115 default:
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
116 suffixLength = "Statement".length;
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
117 }
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
118 break;
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
119 case NC.Expression:
640
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
120 switch (node.kind)
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
121 {
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
122 case NodeKind.VoidInitializer,
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
123 NodeKind.ArrayInitializer,
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
124 NodeKind.StructInitializer:
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
125 break;
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
126 default:
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
127 suffixLength = "Expression".length;
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
128 }
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
129 break;
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
130 case NC.Type:
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
131 suffixLength = "Type".length;
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
132 break;
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
133 case NC.Other:
640
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
134 break;
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
135 default:
640
05645f5613c1 Added an error message.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 619
diff changeset
136 assert(0);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
137 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
138 // Remove common suffix.
581
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
139 name = name[0 .. $ - suffixLength];
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
140 // Store the name in the table.
61f9784aaf2a Improved function getShortClassName().
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 580
diff changeset
141 name_table[node.kind] = name;
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
142 return name;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
143 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
144
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
145 /// Indices into the XML and HTML tag arrays.
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
146 enum DocPart
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
147 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
148 Head,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
149 CompBegin,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
150 CompEnd,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
151 Error,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
152 SyntaxBegin,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
153 SyntaxEnd,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
154 SrcBegin,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
155 SrcEnd,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
156 Tail,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
157 // Tokens:
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
158 Identifier,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
159 Comment,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
160 StringLiteral,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
161 CharLiteral,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
162 Operator,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
163 LorG,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
164 LessEqual,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
165 GreaterEqual,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
166 AndLogical,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
167 OrLogical,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
168 NotEqual,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
169 Not,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
170 Number,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
171 Bracket,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
172 SpecialToken,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
173 Shebang,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
174 Keyword,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
175 HLineBegin,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
176 HLineEnd,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
177 Filespec,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
178 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
179
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
180 auto html_tags = [
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
181 // Head
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
182 `<html>`\n
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
183 `<head>`\n
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
184 `<meta http-equiv="Content-Type" content="text/html; charset=utf-8">`\n
598
4ba8157bde1f Renamed dil_html.css/dil_xml.css to html.css/xml.css.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 596
diff changeset
185 `<link href="html.css" rel="stylesheet" type="text/css">`\n
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
186 `</head>`\n
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
187 `<body>`[],
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
188 // CompBegin
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
189 `<div class="compilerinfo">`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
190 // CompEnd
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
191 `</div>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
192 // Error
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
193 `<p class="error {0}">{1}({2}){3}: {4}</p>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
194 // SyntaxBegin
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
195 `<span class="{0} {1}">`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
196 // SyntaxEnd
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
197 `</span>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
198 // SrcBegin
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
199 `<pre class="sourcecode">`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
200 // SrcEnd
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
201 `</pre>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
202 // Tail
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
203 `</html>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
204 // Identifier
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
205 `<span class="i">{0}</span>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
206 // Comment
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
207 `<span class="c{0}">{1}</span>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
208 // StringLiteral
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
209 `<span class="sl">{0}</span>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
210 // CharLiteral
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
211 `<span class="cl">{0}</span>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
212 // Operator
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
213 `<span class="op">{0}</span>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
214 // LorG
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
215 `<span class="oplg">&lt;&gt;</span>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
216 // LessEqual
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
217 `<span class="ople">&lt;=</span>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
218 // GreaterEqual
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
219 `<span class="opge">&gt;=</span>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
220 // AndLogical
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
221 `<span class="opaa">&amp;&amp;</span>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
222 // OrLogical
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
223 `<span class="opoo">||</span>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
224 // NotEqual
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
225 `<span class="opne">!=</span>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
226 // Not
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
227 `<span class="opn">!</span>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
228 // Number
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
229 `<span class="n">{0}</span>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
230 // Bracket
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
231 `<span class="br">{0}</span>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
232 // SpecialToken
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
233 `<span class="st">{0}</span>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
234 // Shebang
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
235 `<span class="shebang">{0}</span>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
236 // Keyword
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
237 `<span class="k">{0}</span>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
238 // HLineBegin
388
ae154eceba65 Applied some fixes to scanning and printing #line tokens.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 379
diff changeset
239 `<span class="hl">`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
240 // HLineEnd
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
241 "</span>",
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
242 // Filespec
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
243 `<span class="fs">{0}</span>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
244 ];
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
245
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
246 auto xml_tags = [
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
247 // Head
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
248 `<?xml version="1.0"?>`\n
598
4ba8157bde1f Renamed dil_html.css/dil_xml.css to html.css/xml.css.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 596
diff changeset
249 `<?xml-stylesheet href="xml.css" type="text/css"?>`\n
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
250 `<root>`[],
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
251 // CompBegin
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
252 `<compilerinfo>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
253 // CompEnd
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
254 `</compilerinfo>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
255 // Error
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
256 `<error t="{0}">{1}({2}){3}: {4}</error>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
257 // SyntaxBegin
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
258 `<{0} t="{1}">`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
259 // SyntaxEnd
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
260 `</{0}>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
261 // SrcBegin
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
262 `<sourcecode>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
263 // SrcEnd
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
264 `</sourcecode>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
265 // Tail
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
266 `</root>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
267 // Identifier
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
268 "<i>{0}</i>",
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
269 // Comment
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
270 `<c t="{0}">{1}</c>`,
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
271 // StringLiteral
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
272 "<sl>{0}</sl>",
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
273 // CharLiteral
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
274 "<cl>{0}</cl>",
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
275 // Operator
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
276 "<op>{0}</op>",
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
277 // LorG
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
278 `<op t="lg">&lt;&gt;</op>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
279 // LessEqual
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
280 `<op t="le">&lt;=</op>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
281 // GreaterEqual
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
282 `<op t="ge">&gt;=</op>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
283 // AndLogical
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
284 `<op t="aa">&amp;&amp;</op>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
285 // OrLogical
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
286 `<op t="oo">||</op>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
287 // NotEqual
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
288 `<op t="ne">!=</op>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
289 // Not
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
290 `<op t="n">!</op>`,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
291 // Number
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
292 "<n>{0}</n>",
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
293 // Bracket
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
294 "<br>{0}</br>",
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
295 // SpecialToken
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
296 "<st>{0}</st>",
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
297 // Shebang
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
298 "<shebang>{0}</shebang>",
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
299 // Keyword
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
300 "<k>{0}</k>",
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
301 // HLineBegin
388
ae154eceba65 Applied some fixes to scanning and printing #line tokens.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 379
diff changeset
302 "<hl>",
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
303 // HLineEnd
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
304 "</hl>",
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
305 // Filespec
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
306 "<fs>{0}</fs>",
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
307 ];
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
308
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
309 // The size of the arrays must equal the number of members in enum DocPart.
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
310 static assert(html_tags.length == DocPart.max+1);
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
311 static assert(xml_tags.length == DocPart.max+1);
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
312
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
313 /// Prints the syntax tree of a source file using the buffer print.
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
314 void syntaxToDoc(string filePath, Print!(char) print, DocOption options)
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
315 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
316 auto tags = options & DocOption.HTML ? html_tags : xml_tags;
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
317 auto sourceText = loadFile(filePath);
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
318 auto parser = new Parser(sourceText, filePath);
368
2adf808343d6 - Renamed method start() to init() in Parser.
aziz
parents: 364
diff changeset
319 auto root = parser.start();
619
933cd8d24467 Renamed Parser.lx to Parser.lexer.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 598
diff changeset
320 auto lx = parser.lexer;
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
321
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
322 auto token = lx.head;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
323
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
324 print(tags[DocPart.Head]~\n);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
325 // Output error messages.
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
326 if (lx.errors.length || parser.errors.length)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
327 {
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
328 print(tags[DocPart.CompBegin]~\n);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
329 foreach (error; lx.errors)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
330 {
422
ad7977fe315a Added support for column numbers in error messages.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 396
diff changeset
331 print.formatln(tags[DocPart.Error], "L", error.filePath, Format("{0},{1}", error.loc, error.col), "L", xml_escape(error.getMsg));
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
332 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
333 foreach (error; parser.errors)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
334 {
422
ad7977fe315a Added support for column numbers in error messages.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 396
diff changeset
335 print.formatln(tags[DocPart.Error], "P", error.filePath, Format("{0},{1}", error.loc, error.col), "P", xml_escape(error.getMsg));
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
336 }
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
337 print(tags[DocPart.CompEnd]~\n);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
338 }
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
339 print(tags[DocPart.SrcBegin]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
340
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
341 Node[][Token*] beginNodes, endNodes;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
342
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
343 void populateAAs(Node[] nodes)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
344 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
345 foreach (node; nodes)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
346 {
396
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
347 assert(delegate bool(){
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
348 foreach (child; node.children)
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
349 if (child is null)
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
350 return false;
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
351 return true;
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
352 }() == true, Format("Node '{0}' has a null child", node.classinfo.name)
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
353 );
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
354 auto begin = node.begin;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
355 if (begin)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
356 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
357 auto end = node.end;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
358 assert(end);
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
359 beginNodes[begin] ~= node;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
360 endNodes[end] ~= node;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
361 }
396
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
362
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
363 if (node.children.length)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
364 populateAAs(node.children);
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
365 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
366 }
396
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
367 assert(delegate bool(){
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
368 foreach (child; root.children)
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
369 if (child is null)
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
370 return false;
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
371 return true;
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
372 }() == true, Format("Root node has a null child")
0a4619735ce9 Applied fixes to Lexer, Parser and other classes.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 394
diff changeset
373 );
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
374 populateAAs(root.children);
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
375
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
376 char[] getTag(NodeCategory nc)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
377 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
378 char[] tag;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
379 switch (nc)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
380 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
381 alias NodeCategory NC;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
382 case NC.Declaration: tag = "d"; break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
383 case NC.Statement: tag = "s"; break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
384 case NC.Expression: tag = "e"; break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
385 case NC.Type: tag = "t"; break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
386 case NC.Other: tag = "o"; break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
387 default:
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
388 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
389 return tag;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
390 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
391
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
392 // Traverse linked list and print tokens.
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
393 while (token.type != TOK.EOF)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
394 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
395 token = token.next;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
396
394
6440da4adb07 Fixed forward references of enum MID complaints by compiler.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 392
diff changeset
397 // Print whitespace.
6440da4adb07 Fixed forward references of enum MID complaints by compiler.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 392
diff changeset
398 if (token.ws)
6440da4adb07 Fixed forward references of enum MID complaints by compiler.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 392
diff changeset
399 print(token.ws[0..token.start - token.ws]);
6440da4adb07 Fixed forward references of enum MID complaints by compiler.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 392
diff changeset
400
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
401 Node[]* nodes = token in beginNodes;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
402
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
403 if (nodes)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
404 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
405 foreach (node; *nodes)
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
406 print.format(tags[DocPart.SyntaxBegin], getTag(node.category), getShortClassName(node));
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
407 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
408
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
409 printToken(token, tags, print);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
410
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
411 nodes = token in endNodes;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
412
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
413 if (nodes)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
414 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
415 foreach_reverse (node; *nodes)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
416 if (options & DocOption.HTML)
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
417 print(tags[DocPart.SyntaxEnd]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
418 else
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
419 print.format(tags[DocPart.SyntaxEnd], getTag(node.category));
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
420 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
421 }
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
422 print(\n~tags[DocPart.SrcEnd])(\n~tags[DocPart.Tail]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
423 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
424
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
425 /// Prints all tokens of a source file using the buffer print.
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
426 void tokensToDoc(string filePath, Print!(char) print, DocOption options)
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
427 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
428 auto tags = options & DocOption.HTML ? html_tags : xml_tags;
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
429 auto sourceText = loadFile(filePath);
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
430 auto lx = new Lexer(sourceText, filePath);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
431
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
432 auto token = lx.getTokens();
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
433
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
434 print(tags[DocPart.Head]~\n);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
435
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
436 if (lx.errors.length)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
437 {
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
438 print(tags[DocPart.CompBegin]~\n);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
439 foreach (error; lx.errors)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
440 {
422
ad7977fe315a Added support for column numbers in error messages.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 396
diff changeset
441 print.formatln(tags[DocPart.Error], "L", error.filePath, Format("{0},{1}", error.loc, error.col), "L", xml_escape(error.getMsg));
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
442 }
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
443 print(tags[DocPart.CompEnd]~\n);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
444 }
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
445 print(tags[DocPart.SrcBegin]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
446
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
447 // Traverse linked list and print tokens.
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
448 while (token.type != TOK.EOF)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
449 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
450 token = token.next;
394
6440da4adb07 Fixed forward references of enum MID complaints by compiler.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 392
diff changeset
451 // Print whitespace.
6440da4adb07 Fixed forward references of enum MID complaints by compiler.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 392
diff changeset
452 if (token.ws)
6440da4adb07 Fixed forward references of enum MID complaints by compiler.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 392
diff changeset
453 print(token.ws[0..token.start - token.ws]);
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
454 printToken(token, tags, print);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
455 }
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
456 print(\n~tags[DocPart.SrcEnd])(\n~tags[DocPart.Tail]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
457 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
458
582
724603deed37 Added comments and renamed a few variables.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 581
diff changeset
459 /// Prints a token with tags using the buffer print.
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
460 void printToken(Token* token, string[] tags, Print!(char) print)
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
461 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
462 alias DocPart DP;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
463 string srcText = xml_escape(token.srcText);
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
464
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
465 switch(token.type)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
466 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
467 case TOK.Identifier:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
468 print.format(tags[DP.Identifier], srcText);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
469 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
470 case TOK.Comment:
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
471 string t;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
472 switch (token.start[1])
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
473 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
474 case '/': t = "l"; break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
475 case '*': t = "b"; break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
476 case '+': t = "n"; break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
477 default:
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
478 assert(0);
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
479 }
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
480 print.format(tags[DP.Comment], t, srcText);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
481 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
482 case TOK.String:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
483 print.format(tags[DP.StringLiteral], srcText);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
484 break;
507
996041463028 Removed TOK.WCharLiteral and TOK.DCharLiteral.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 485
diff changeset
485 case TOK.CharLiteral:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
486 print.format(tags[DP.CharLiteral], srcText);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
487 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
488 case TOK.Assign, TOK.Equal,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
489 TOK.Less, TOK.Greater,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
490 TOK.LShiftAssign, TOK.LShift,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
491 TOK.RShiftAssign, TOK.RShift,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
492 TOK.URShiftAssign, TOK.URShift,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
493 TOK.OrAssign, TOK.OrBinary,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
494 TOK.AndAssign, TOK.AndBinary,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
495 TOK.PlusAssign, TOK.PlusPlus, TOK.Plus,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
496 TOK.MinusAssign, TOK.MinusMinus, TOK.Minus,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
497 TOK.DivAssign, TOK.Div,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
498 TOK.MulAssign, TOK.Mul,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
499 TOK.ModAssign, TOK.Mod,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
500 TOK.XorAssign, TOK.Xor,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
501 TOK.CatAssign,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
502 TOK.Tilde,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
503 TOK.Unordered,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
504 TOK.UorE,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
505 TOK.UorG,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
506 TOK.UorGorE,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
507 TOK.UorL,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
508 TOK.UorLorE,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
509 TOK.LorEorG:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
510 print.format(tags[DP.Operator], srcText);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
511 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
512 case TOK.LorG:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
513 print(tags[DP.LorG]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
514 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
515 case TOK.LessEqual:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
516 print(tags[DP.LessEqual]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
517 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
518 case TOK.GreaterEqual:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
519 print(tags[DP.GreaterEqual]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
520 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
521 case TOK.AndLogical:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
522 print(tags[DP.AndLogical]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
523 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
524 case TOK.OrLogical:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
525 print(tags[DP.OrLogical]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
526 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
527 case TOK.NotEqual:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
528 print(tags[DP.NotEqual]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
529 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
530 case TOK.Not:
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
531 // Check if this is part of a template instantiation.
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
532 // TODO: comments aren't skipped. Use Token.nextNWS and Token.prevNWS
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
533 if (token.prev.type == TOK.Identifier && token.next.type == TOK.LParen)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
534 goto default;
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
535 print(tags[DP.Not]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
536 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
537 case TOK.Int32, TOK.Int64, TOK.Uint32, TOK.Uint64,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
538 TOK.Float32, TOK.Float64, TOK.Float80,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
539 TOK.Imaginary32, TOK.Imaginary64, TOK.Imaginary80:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
540 print.format(tags[DP.Number], srcText);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
541 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
542 case TOK.LParen, TOK.RParen, TOK.LBracket,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
543 TOK.RBracket, TOK.LBrace, TOK.RBrace:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
544 print.format(tags[DP.Bracket], srcText);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
545 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
546 case TOK.Shebang:
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
547 print.format(tags[DP.Shebang], srcText);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
548 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
549 case TOK.HashLine:
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
550 void printWS(char* start, char* end)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
551 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
552 if (start != end)
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
553 print(start[0 .. end - start]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
554 }
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
555 print(tags[DP.HLineBegin]);
485
ea8c7459f1c4 Changed a lot of things in the Lexer.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 422
diff changeset
556 auto num = token.tokLineNum;
388
ae154eceba65 Applied some fixes to scanning and printing #line tokens.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 379
diff changeset
557 if (num is null)
ae154eceba65 Applied some fixes to scanning and printing #line tokens.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 379
diff changeset
558 {
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
559 print(token.srcText);
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
560 print(tags[DP.HLineEnd]);
388
ae154eceba65 Applied some fixes to scanning and printing #line tokens.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 379
diff changeset
561 break;
ae154eceba65 Applied some fixes to scanning and printing #line tokens.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 379
diff changeset
562 }
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
563 // Print whitespace between #line and number
388
ae154eceba65 Applied some fixes to scanning and printing #line tokens.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 379
diff changeset
564 auto ptr = token.start;
ae154eceba65 Applied some fixes to scanning and printing #line tokens.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 379
diff changeset
565 printWS(ptr, num.start); // prints "#line" as well
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
566 printToken(num, tags, print);
485
ea8c7459f1c4 Changed a lot of things in the Lexer.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 422
diff changeset
567 if (token.tokLineFilespec)
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
568 {
485
ea8c7459f1c4 Changed a lot of things in the Lexer.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 422
diff changeset
569 auto filespec = token.tokLineFilespec;
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
570 // Print whitespace between number and filespec
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
571 printWS(num.end, filespec.start);
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
572 print.format(tags[DP.Filespec], xml_escape(filespec.srcText));
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
573
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
574 ptr = filespec.end;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
575 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
576 else
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
577 ptr = num.end;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
578 // Print remaining whitespace
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
579 printWS(ptr, token.end);
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
580 print(tags[DP.HLineEnd]);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
581 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
582 default:
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
583 if (token.isKeyword())
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
584 print.format(tags[DP.Keyword], srcText);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
585 else if (token.isSpecialToken)
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
586 print.format(tags[DP.SpecialToken], srcText);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
587 else
391
33b566df6af4 Migrated project to Tango.
Aziz K?ksal <aziz.koeksal@gmail.com>
parents: 390
diff changeset
588 print(srcText);
363
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
589 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
590 }