annotate dang/compiler.d @ 13:e5caf9971207

Checking for types and identifiers. TODO: Make each varDecl create a new scope
author johnsen@johnsen-desktop
date Fri, 18 Apr 2008 14:47:23 +0200
parents 2168f4cb73f1
children e331e4e816e4
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
1 module dang.compiler;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
2
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
3 import tango.io.Stdout,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
4 tango.core.Signal,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
5 tango.io.FilePath;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
6
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
7 import lexer.Lexer,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
8 parser.Parser;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
9
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
10 import misc.DataSource;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
11
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
12 import ast.Decl;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
13
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
14 import tools.AstPrinter,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
15 tools.DotPrinter;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
16
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
17 import gen.LuaGen,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
18 gen.LLVMGen;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
19
13
e5caf9971207 Checking for types and identifiers. TODO: Make each varDecl create a new scope
johnsen@johnsen-desktop
parents: 1
diff changeset
20 import sema.Visitor,
e5caf9971207 Checking for types and identifiers. TODO: Make each varDecl create a new scope
johnsen@johnsen-desktop
parents: 1
diff changeset
21 sema.SymbolTableBuilder,
e5caf9971207 Checking for types and identifiers. TODO: Make each varDecl create a new scope
johnsen@johnsen-desktop
parents: 1
diff changeset
22 sema.Declarations;
1
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
23
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
24 import dang.OptParse;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
25
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
26 void checkFiles(char[][] *files)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
27 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
28 bool error = false;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
29
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
30 char[][] validFiles;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
31
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
32 foreach(file ; *files)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
33 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
34 auto path = new FilePath(file);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
35
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
36 if(!path.exists)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
37 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
38 Stdout("File '"~file~"' does not exists").newline;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
39 error = true;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
40
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
41 continue;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
42 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
43
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
44 bool fileInStack = false;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
45 foreach(vFile ; validFiles)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
46 if(vFile == file)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
47 fileInStack = true;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
48
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
49 if(fileInStack)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
50 continue;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
51
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
52 validFiles ~= file;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
53 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
54
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
55 *files = validFiles;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
56
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
57 if(error)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
58 throw new Exception("Some file(s) did not exist");
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
59 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
60 void main(char[][] args)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
61 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
62 char[][] filesToHandle;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
63
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
64 Signal!(char[][]*) preStart;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
65
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
66 Signal!(char[]) preLex;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
67 Signal!(Lexer) postLex;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
68
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
69 Signal!(Lexer) preParse;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
70 Signal!(Decl[], DataSource) postParse;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
71
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
72 preStart.attach(&checkFiles);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
73
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
74 auto argParse = new OptionParser;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
75
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
76 argParse.addOption(
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
77 ["-h", "--help"],{
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
78 argParse.helpText();
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
79 return;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
80 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
81 ).help("Show this help message");
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
82
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
83 argParse.addOption(
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
84 ["--ast-dump-dot"], {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
85 postParse.attach(
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
86 (Decl[] decls, DataSource src) {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
87 auto print = new DotPrinter();
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
88 print.print(decls);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
89 });
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
90 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
91 ).help("Output the AST as dot-graphicz");
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
92
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
93 argParse.addOption(
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
94 ["--ast-dump-code"], {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
95 postParse.attach(
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
96 (Decl[] decls, DataSource src) {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
97 auto print = new AstPrinter(src);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
98 print.print(decls);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
99 });
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
100 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
101 ).help("Output the AST as dot-graphicz");
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
102
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
103 argParse.addOption(
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
104 ["--gen-lua"], {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
105 postParse.attach(
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
106 (Decl[] decls, DataSource src) {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
107 auto luaGen = new LuaGen();
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
108 luaGen.gen(decls);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
109 });
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
110 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
111 ).help("Compile to Lua code");
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
112
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
113 argParse.addOption(
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
114 ["--gen-llvm"], {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
115 postParse.attach(
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
116 (Decl[] decls, DataSource src) {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
117 auto llvmGen = new LLVMGen();
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
118 llvmGen.gen(decls);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
119 });
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
120 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
121 ).help("Compile to LLVM code");
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
122
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
123 auto options = argParse.parse(args);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
124
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
125 filesToHandle ~= options.args;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
126
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
127 try
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
128 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
129 preStart(&filesToHandle);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
130 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
131 catch(Exception e)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
132 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
133 return;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
134 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
135
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
136 foreach(file ; filesToHandle)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
137 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
138 preLex(file);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
139
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
140 auto src = DataSource(file);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
141 auto lexer = new Lexer(src);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
142
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
143 postLex(lexer);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
144
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
145 preParse(lexer);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
146
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
147 auto parser = new Parser;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
148 auto decls = parser.parse(lexer);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
149
13
e5caf9971207 Checking for types and identifiers. TODO: Make each varDecl create a new scope
johnsen@johnsen-desktop
parents: 1
diff changeset
150 (new SymbolTableBuilder).visit(decls);
e5caf9971207 Checking for types and identifiers. TODO: Make each varDecl create a new scope
johnsen@johnsen-desktop
parents: 1
diff changeset
151 (new Declarations).visit(decls);
e5caf9971207 Checking for types and identifiers. TODO: Make each varDecl create a new scope
johnsen@johnsen-desktop
parents: 1
diff changeset
152
1
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
153 postParse(decls, src);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
154 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
155
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
156 /* if (args.length > 1 && args[1] == "lex")
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
157 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
158 Token t;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
159
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
160 t = lexer.next();
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
161 while(t.type != Tok.EOF)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
162 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
163 Stdout(src.get(t.position, t.length)).newline;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
164 t = lexer.next();
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
165 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
166 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
167 else
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
168 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
169 auto decl = parser.parse(lexer);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
170 if(args.length > 1 && args[1] == "dump-ast")
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
171 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
172 auto buffer = new AstBuffer(src.data);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
173 decl.print(buffer);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
174 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
175 }*/
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
176 }