annotate main.d @ 4:d706d958e4e8

Step 2 of restoring GC functionality.
author korDen
date Mon, 26 Oct 2009 16:28:19 +0300
parents 10317f0c89a5
children 2cc604139636
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1 module main;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
2
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
3 import dmd.Array;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
4 import dmd.Module;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
5 import dmd.Global;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
6 import dmd.VersionCondition;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
7 import dmd.DebugCondition;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
8 import dmd.Loc;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
9 import dmd.Lexer;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
10 import dmd.OutBuffer;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
11 import dmd.FileName;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
12 import dmd.Type;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
13 import dmd.File;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
14 import dmd.Id;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
15 import dmd.Identifier;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
16 import dmd.Library;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
17 import dmd.TOK;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
18 import dmd.String;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
19 import dmd.backend.glue;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
20
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
21 import std.stdarg;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
22 import std.string : toStringz;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
23 import std.contracts;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
24
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
25 import core.stdc.string;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
26 import core.stdc.stdio;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
27 import core.stdc.ctype;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
28 import core.stdc.errno;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
29 import core.stdc.stdlib;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
30 import core.stdc.limits;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
31
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
32 import core.memory;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
33
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
34 import dlib.CrashHandler;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
35 import dbg.ui.CrashWindow;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
36
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
37 import dmd.Util;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
38
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
39 bool loop = true;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
40
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
41 enum ExitCode
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
42 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
43 EXIT_SUCCESS = 0,
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
44 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
45
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
46 version (Windows)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
47 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
48 private import core.stdc.wchar_;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
49 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
50
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
51 extern (C) void gc_init();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
52 extern (C) void gc_term();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
53 extern (C) void _minit();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
54 extern (C) void _moduleCtor();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
55 extern (C) void _moduleDtor();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
56 extern (C) void thread_joinAll();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
57
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
58 shared bool _d_isHalting = false;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
59
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
60 import win32.windows;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
61
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
62 extern (C) int main(int argc, char **argv)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
63 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
64 char[][] args;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
65 int result;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
66
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
67 version (OSX)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
68 { /* OSX does not provide a way to get at the top of the
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
69 * stack, except for the magic value 0xC0000000.
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
70 * But as far as the gc is concerned, argv is at the top
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
71 * of the main thread's stack, so save the address of that.
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
72 */
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
73 __osx_stack_end = cast(void*)&argv;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
74 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
75
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
76 version (Posix)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
77 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
78 _STI_monitor_staticctor();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
79 _STI_critical_init();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
80 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
81
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
82 version (Windows)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
83 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
84 wchar_t* wcbuf = GetCommandLineW();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
85 size_t wclen = wcslen(wcbuf);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
86 int wargc = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
87 wchar_t** wargs = CommandLineToArgvW(wcbuf, &wargc);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
88 assert(wargc == argc);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
89
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
90 char* cargp = null;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
91 size_t cargl = WideCharToMultiByte(65001, 0, wcbuf, wclen, null, 0, null, null);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
92
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
93 cargp = cast(char*) alloca(cargl);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
94 args = ((cast(char[]*) alloca(wargc * (char[]).sizeof)))[0 .. wargc];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
95
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
96 for (size_t i = 0, p = 0; i < wargc; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
97 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
98 int wlen = wcslen(wargs[i]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
99 int clen = WideCharToMultiByte(65001, 0, &wargs[i][0], wlen, null, 0, null, null);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
100 args[i] = cargp[p .. p+clen];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
101 p += clen; assert(p <= cargl);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
102 WideCharToMultiByte(65001, 0, &wargs[i][0], wlen, &args[i][0], clen, null, null);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
103 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
104 LocalFree(cast(HANDLE)wargs);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
105 wargs = null;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
106 wargc = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
107 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
108 else version (Posix)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
109 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
110 char[]* am = cast(char[]*) malloc(argc * (char[]).sizeof);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
111 scope(exit) free(am);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
112
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
113 for (size_t i = 0; i < argc; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
114 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
115 auto len = strlen(argv[i]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
116 am[i] = argv[i][0 .. len];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
117 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
118 args = am[0 .. argc];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
119 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
120
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
121 gc_init();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
122 version (Windows)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
123 _minit();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
124 _moduleCtor();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
125
4
d706d958e4e8 Step 2 of restoring GC functionality.
korDen
parents: 0
diff changeset
126 GC.disable();
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
127 CrashHandlerInit();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
128
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
129 result = main(cast(string[])args);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
130
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
131 thread_joinAll();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
132 _d_isHalting = true;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
133 _moduleDtor();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
134 gc_term();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
135
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
136 version (Posix)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
137 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
138 _STD_critical_term();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
139 _STD_monitor_staticdtor();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
140 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
141
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
142 return result;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
143 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
144
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
145 int main(string[] args)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
146 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
147 Array files = new Array();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
148 Array libmodules = new Array();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
149 Module m;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
150 int status = ExitCode.EXIT_SUCCESS;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
151 int argcstart = args.length;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
152 int setdebuglib = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
153
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
154 global = new Global();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
155
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
156 /// if (response_expand(&argc,&argv)) // expand response files
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
157 /// error("can't open response file");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
158
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
159 files.reserve(args.length - 1);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
160
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
161 // Set default values
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
162 global.params.argv0 = args[0];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
163 global.params.link = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
164 global.params.useAssert = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
165 global.params.useInvariants = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
166 global.params.useIn = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
167 global.params.useOut = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
168 global.params.useArrayBounds = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
169 global.params.useSwitchError = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
170 global.params.useInline = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
171 global.params.obj = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
172 global.params.Dversion = 2;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
173 global.params.quiet = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
174
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
175 global.params.linkswitches = new Array();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
176 global.params.libfiles = new Array();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
177 global.params.objfiles = new Array();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
178 global.params.ddocfiles = new Array();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
179
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
180 version (TARGET_WINDOS) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
181 global.params.defaultlibname = "phobos";
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
182 } else version (XXX) { //#elif TARGET_LINUX || TARGET_OSX || TARGET_FREEBSD || TARGET_SOLARIS
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
183 global.params.defaultlibname = "phobos2";
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
184 } else version (TARGET_NET) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
185 } else {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
186 static assert(false, "fix this");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
187 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
188
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
189 // Predefine version identifiers
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
190 VersionCondition.addPredefinedGlobalIdent("DigitalMars");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
191
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
192 version (TARGET_WINDOS) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
193 VersionCondition.addPredefinedGlobalIdent("Windows");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
194 global.params.isWindows = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
195 version (TARGET_NET) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
196 // TARGET_NET macro is NOT mutually-exclusive with TARGET_WINDOS
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
197 VersionCondition.addPredefinedGlobalIdent("D_NET");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
198 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
199 } else version (TARGET_LINUX) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
200 VersionCondition.addPredefinedGlobalIdent("Posix");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
201 VersionCondition.addPredefinedGlobalIdent("linux");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
202 global.params.isLinux = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
203 } else version (TARGET_OSX) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
204 VersionCondition.addPredefinedGlobalIdent("Posix");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
205 VersionCondition.addPredefinedGlobalIdent("OSX");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
206 global.params.isOSX = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
207
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
208 // For legacy compatibility
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
209 VersionCondition.addPredefinedGlobalIdent("darwin");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
210 } else version (TARGET_FREEBSD) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
211 VersionCondition.addPredefinedGlobalIdent("Posix");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
212 VersionCondition.addPredefinedGlobalIdent("FreeBSD");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
213 global.params.isFreeBSD = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
214 } else version (TARGET_SOLARIS) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
215 VersionCondition.addPredefinedGlobalIdent("Posix");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
216 VersionCondition.addPredefinedGlobalIdent("Solaris");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
217 global.params.isSolaris = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
218 } else {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
219 static assert (false, "fix this");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
220 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
221
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
222 VersionCondition.addPredefinedGlobalIdent("LittleEndian");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
223 //VersionCondition.addPredefinedGlobalIdent("D_Bits");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
224 version (DMDV2) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
225 VersionCondition.addPredefinedGlobalIdent("D_Version2");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
226 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
227 VersionCondition.addPredefinedGlobalIdent("all");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
228
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
229 version (_WIN32) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
230 inifile(args[0], "sc.ini");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
231 } else version (XXX) {///linux || __APPLE__ || __FreeBSD__ || __sun&&__SVR4
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
232 inifile(argv[0], "dmd.conf");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
233 } else {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
234 static assert (false, "fix this");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
235 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
236 args = getenv_setargv("DFLAGS", args);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
237
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
238 version (disabled) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
239 for (i = 0; i < argc; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
240 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
241 writef("argv[%d] = '%s'\n", i, argv[i]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
242 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
243 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
244
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
245 foreach(i; 1..args.length)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
246 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
247 auto arg = args[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
248 auto p = arg.ptr;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
249 if (*p == '-')
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
250 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
251 arg = arg[1..$];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
252 if (arg == "d")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
253 global.params.useDeprecated = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
254 else if (arg == "c")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
255 global.params.link = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
256 else if (arg == "cov")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
257 global.params.cov = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
258 ///version (XXX) {// TARGET_LINUX || TARGET_OSX || TARGET_FREEBSD || TARGET_SOLARIS
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
259 /// else if (arg == "fPIC")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
260 /// global.params.pic = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
261 ///}
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
262 else if (arg == "multiobj")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
263 global.params.multiobj = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
264 else if (arg == "g")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
265 global.params.symdebug = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
266 else if (arg == "gc")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
267 global.params.symdebug = 2;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
268 else if (arg == "gt")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
269 { error("use -profile instead of -gt\n");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
270 global.params.trace = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
271 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
272 else if (arg == "m64")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
273 global.params.isX86_64 = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
274 else if (arg == "profile")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
275 global.params.trace = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
276 else if (arg == "v")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
277 global.params.verbose = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
278 ///version (DMDV2) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
279 else if (arg == "vtls")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
280 global.params.vtls = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
281 ///}
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
282 else if (arg == "v1")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
283 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
284 version (DMDV1) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
285 global.params.Dversion = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
286 } else {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
287 error("use DMD 1.0 series compilers for -v1 switch");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
288 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
289 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
290 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
291 else if (arg == "w")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
292 global.params.warnings = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
293 else if (arg == "O")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
294 global.params.optimize = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
295 else if (p[1] == 'o')
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
296 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
297 switch (p[2])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
298 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
299 case '-':
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
300 global.params.obj = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
301 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
302
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
303 case 'd':
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
304 if (!p[3])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
305 goto Lnoarg;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
306 global.params.objdir = arg[(p - arg.ptr) + 3..$];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
307 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
308
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
309 case 'f':
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
310 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
311 if (!p[3])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
312 goto Lnoarg;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
313
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
314 global.params.objname = arg[(p - arg.ptr) + 3..$];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
315 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
316 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
317
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
318 case 'p':
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
319 if (p[3])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
320 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
321 global.params.preservePaths = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
322 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
323
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
324 case 0:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
325 error("-o no longer supported, use -of or -od");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
326 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
327
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
328 default:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
329 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
330 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
331 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
332 else if (p[1] == 'D')
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
333 { global.params.doDocComments = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
334 switch (p[2])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
335 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
336 case 'd':
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
337 if (!p[3])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
338 goto Lnoarg;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
339 global.params.docdir = arg[(p - arg.ptr) + 3..$];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
340 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
341 case 'f':
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
342 if (!p[3])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
343 goto Lnoarg;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
344 global.params.docname = arg[(p - arg.ptr) + 3..$];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
345 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
346
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
347 case 0:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
348 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
349
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
350 default:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
351 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
352 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
353 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
354 ///version (_DH) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
355 else if (p[1] == 'H')
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
356 { global.params.doHdrGeneration = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
357 switch (p[2])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
358 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
359 case 'd':
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
360 if (!p[3])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
361 goto Lnoarg;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
362 global.params.hdrdir = arg[(p - arg.ptr) + 3..$];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
363 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
364
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
365 case 'f':
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
366 if (!p[3])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
367 goto Lnoarg;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
368 global.params.hdrname = arg[(p - arg.ptr) + 3..$];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
369 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
370
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
371 case 0:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
372 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
373
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
374 default:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
375 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
376 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
377 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
378 ///}
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
379 else if (arg == "ignore")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
380 global.params.ignoreUnsupportedPragmas = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
381 else if (arg == "inline")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
382 global.params.useInline = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
383 else if (arg == "lib")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
384 global.params.lib = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
385 else if (arg == "nofloat")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
386 global.params.nofloat = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
387 else if (arg == "quiet")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
388 global.params.quiet = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
389 else if (arg == "release")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
390 global.params.release = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
391 ///version (DMDV2) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
392 else if (arg == "safe")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
393 global.params.safe = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
394 ///}
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
395 else if (arg == "unittest")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
396 global.params.useUnitTests = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
397 else if (p[1] == 'I')
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
398 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
399 if (!global.params.imppath)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
400 global.params.imppath = new Array();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
401 global.params.imppath.push(cast(void*)new String(arg[(p - arg.ptr) + 2..$])); ///
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
402 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
403 else if (p[1] == 'J')
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
404 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
405 if (!global.params.fileImppath)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
406 global.params.fileImppath = new Array();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
407 global.params.fileImppath.push(cast(void*)new String(arg[(p - arg.ptr) + 2..$]));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
408 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
409 else if (memcmp(p + 1, "debug".ptr, 5) == 0 && p[6] != 'l')
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
410 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
411 // Parse:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
412 // -debug
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
413 // -debug=number
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
414 // -debug=identifier
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
415 if (p[6] == '=')
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
416 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
417 if (isdigit(p[7]))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
418 { long level;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
419
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
420 errno = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
421 level = strtol(p + 7, cast(char**)&p, 10);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
422 if (*p || errno || level > INT_MAX)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
423 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
424 DebugCondition.setGlobalLevel(cast(int)level);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
425 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
426 else if (Lexer.isValidIdentifier(arg[(p - arg.ptr) + 7..$])) ///
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
427 DebugCondition.addGlobalIdent(p + 7);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
428 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
429 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
430 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
431 else if (p[6])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
432 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
433 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
434 global.params.debuglevel = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
435 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
436 else if (memcmp(p + 1, "version".ptr, 5) == 0)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
437 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
438 // Parse:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
439 // -version=number
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
440 // -version=identifier
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
441 if (p[8] == '=')
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
442 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
443 if (isdigit(p[9]))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
444 { long level;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
445
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
446 errno = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
447 level = strtol(p + 9, cast(char**)&p, 10); ///
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
448 if (*p || errno || level > INT_MAX)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
449 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
450 VersionCondition.setGlobalLevel(cast(int)level);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
451 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
452 else if (Lexer.isValidIdentifier(arg[(p - arg.ptr) + 9..$])) ///
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
453 VersionCondition.addGlobalIdent(arg[(p - arg.ptr) + 9..$]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
454 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
455 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
456 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
457 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
458 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
459 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
460 else if (arg == "-b")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
461 global.params.debugb = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
462 else if (arg == "-c")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
463 global.params.debugc = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
464 else if (arg == "-f")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
465 global.params.debugf = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
466 else if (arg == "-help")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
467 { usage();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
468 exit(EXIT_SUCCESS);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
469 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
470 else if (arg == "-r")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
471 global.params.debugr = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
472 else if (arg == "-x")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
473 global.params.debugx = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
474 else if (arg == "-y")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
475 global.params.debugy = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
476 else if (p[1] == 'L')
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
477 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
478 global.params.linkswitches.push(cast(void*)p + 2);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
479 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
480 else if (memcmp(p + 1, "defaultlib=".ptr, 11) == 0)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
481 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
482 global.params.defaultlibname = p + 1 + 11;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
483 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
484 else if (memcmp(p + 1, "debuglib=".ptr, 9) == 0)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
485 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
486 setdebuglib = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
487 global.params.debuglibname = p + 1 + 9;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
488 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
489 else if (memcmp(p + 1, "deps=".ptr, 5) == 0)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
490 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
491 global.params.moduleDepsFile = arg[(p - arg.ptr) + 1 + 5..$];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
492 if (!global.params.moduleDepsFile[0])
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
493 goto Lnoarg;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
494 global.params.moduleDeps = new OutBuffer;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
495 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
496 else if (memcmp(p + 1, "man".ptr, 3) == 0)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
497 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
498 version (_WIN32) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
499 version (DMDV1) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
500 browse("http://www.digitalmars.com/d/1.0/dmd-windows.html");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
501 } else {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
502 browse("http://www.digitalmars.com/d/2.0/dmd-windows.html");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
503 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
504 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
505 version (linux) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
506 version (DMDV1) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
507 browse("http://www.digitalmars.com/d/1.0/dmd-linux.html");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
508 } else {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
509 browse("http://www.digitalmars.com/d/2.0/dmd-linux.html");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
510 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
511 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
512 version (__APPLE__) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
513 version (DMDV1) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
514 browse("http://www.digitalmars.com/d/1.0/dmd-osx.html");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
515 } else {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
516 browse("http://www.digitalmars.com/d/2.0/dmd-osx.html");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
517 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
518 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
519 version (__FreeBSD__) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
520 version (DMDV1) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
521 browse("http://www.digitalmars.com/d/1.0/dmd-freebsd.html");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
522 } else {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
523 browse("http://www.digitalmars.com/d/2.0/dmd-freebsd.html");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
524 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
525 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
526 exit(EXIT_SUCCESS);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
527 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
528 else if (arg == "run")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
529 { global.params.run = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
530 global.params.runargs_length = ((i >= argcstart) ? args.length : argcstart) - i - 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
531 if (global.params.runargs_length)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
532 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
533 files.push(cast(void*)args[i + 1].ptr);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
534 global.params.runargs = args[i + 2..$];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
535 i += global.params.runargs_length;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
536 global.params.runargs_length--;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
537 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
538 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
539 { global.params.run = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
540 goto Lnoarg;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
541 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
542 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
543 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
544 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
545 Lerror:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
546 error("unrecognized switch '%s'", args[i]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
547 continue;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
548
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
549 Lnoarg:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
550 error("argument expected for switch '%s'", args[i]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
551 continue;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
552 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
553 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
554 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
555 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
556 version (TARGET_WINDOS) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
557 string ext = FileName.ext(p[0..arg.length]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
558 if (ext != null && FileName.compare(ext, "exe") == 0)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
559 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
560 global.params.objname = arg[(p - arg.ptr)..$];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
561 continue;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
562 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
563 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
564 files.push(cast(void*)new String(arg[(p - arg.ptr)..$]));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
565 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
566 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
567 if (global.errors)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
568 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
569 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
570 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
571 if (files.dim == 0)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
572 { usage();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
573 return EXIT_FAILURE;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
574 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
575
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
576 if (!setdebuglib)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
577 global.params.debuglibname = global.params.defaultlibname;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
578
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
579 version (TARGET_OSX) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
580 global.params.pic = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
581 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
582
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
583 if (global.params.release)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
584 { global.params.useInvariants = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
585 global.params.useIn = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
586 global.params.useOut = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
587 global.params.useAssert = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
588 global.params.useArrayBounds = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
589 global.params.useSwitchError = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
590 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
591
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
592 if (global.params.run)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
593 global.params.quiet = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
594
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
595 if (global.params.useUnitTests)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
596 global.params.useAssert = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
597
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
598 if (!global.params.obj || global.params.lib)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
599 global.params.link = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
600
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
601 if (global.params.link)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
602 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
603 global.params.exefile = global.params.objname;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
604 global.params.oneobj = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
605 if (global.params.objname)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
606 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
607 /* Use this to name the one object file with the same
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
608 * name as the exe file.
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
609 */
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
610 global.params.objname = FileName.forceExt(global.params.objname, global.obj_ext).toChars();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
611
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
612 /* If output directory is given, use that path rather than
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
613 * the exe file path.
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
614 */
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
615 if (global.params.objdir)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
616 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
617 string name = FileName.name(global.params.objname);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
618 global.params.objname = FileName.combine(global.params.objdir, name);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
619 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
620 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
621 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
622 else if (global.params.lib)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
623 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
624 global.params.libname = global.params.objname;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
625 global.params.objname = null;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
626
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
627 // Haven't investigated handling these options with multiobj
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
628 if (!global.params.cov && !global.params.trace)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
629 global.params.multiobj = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
630 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
631 else if (global.params.run)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
632 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
633 error("flags conflict with -run");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
634 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
635 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
636 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
637 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
638 if (global.params.objname && files.dim > 1)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
639 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
640 global.params.oneobj = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
641 //error("multiple source files, but only one .obj name");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
642 //fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
643 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
644 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
645 if (global.params.isX86_64)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
646 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
647 VersionCondition.addPredefinedGlobalIdent("D_InlineAsm_X86_64");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
648 VersionCondition.addPredefinedGlobalIdent("X86_64");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
649 VersionCondition.addPredefinedGlobalIdent("D_LP64");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
650 version (TARGET_WINDOS) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
651 VersionCondition.addPredefinedGlobalIdent("Win64");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
652 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
653 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
654 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
655 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
656 VersionCondition.addPredefinedGlobalIdent("D_InlineAsm");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
657 VersionCondition.addPredefinedGlobalIdent("D_InlineAsm_X86");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
658 VersionCondition.addPredefinedGlobalIdent("X86");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
659 version (TARGET_WINDOS) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
660 VersionCondition.addPredefinedGlobalIdent("Win32");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
661 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
662 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
663 if (global.params.doDocComments)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
664 VersionCondition.addPredefinedGlobalIdent("D_Ddoc");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
665 if (global.params.cov)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
666 VersionCondition.addPredefinedGlobalIdent("D_Coverage");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
667 if (global.params.pic)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
668 VersionCondition.addPredefinedGlobalIdent("D_PIC");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
669 version (DMDV2) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
670 if (global.params.useUnitTests)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
671 VersionCondition.addPredefinedGlobalIdent("unittest");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
672 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
673
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
674 // Initialization
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
675 Type.init();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
676 Id.initialize();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
677 Module.init();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
678 initPrecedence();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
679
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
680 backend_init();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
681
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
682 //printf("%d source files\n",files.dim);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
683
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
684 // Build import search path
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
685 if (global.params.imppath)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
686 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
687 for (int i = 0; i < global.params.imppath.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
688 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
689 string path = (cast(String)global.params.imppath.data[i]).str;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
690 string[] a = FileName.splitPath(path);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
691
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
692 global.path ~= a;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
693 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
694 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
695
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
696 // Build string import search path
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
697 if (global.params.fileImppath)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
698 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
699 for (int i = 0; i < global.params.fileImppath.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
700 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
701 string path = (cast(String)global.params.fileImppath.data[i]).str;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
702 string[] a = FileName.splitPath(path);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
703
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
704 global.filePath ~= a;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
705 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
706 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
707
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
708 // Create Modules
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
709 Array modules = new Array();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
710 modules.reserve(files.dim);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
711 int firstmodule = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
712 for (int i = 0; i < files.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
713 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
714 string ext;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
715 string name;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
716
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
717 String s = cast(String) files.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
718 string mp = s.str;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
719
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
720 version (_WIN32) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
721 char[] copy = null;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
722 // Convert / to \ so linker will work
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
723 foreach (j, c; mp)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
724 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
725 if (c == '/') {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
726 if (copy is null) copy = mp.dup;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
727 copy[j] = '\\';
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
728 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
729 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
730
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
731 if (copy !is null) mp = assumeUnique(copy);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
732 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
733 string p = mp;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
734
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
735 p = FileName.name(p); // strip path
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
736 ext = FileName.ext(p);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
737
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
738 if (ext.length != 0)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
739 { /* Deduce what to do with a file based on its extension
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
740 */
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
741 if (FileName.equals(ext, global.obj_ext))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
742 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
743 global.params.objfiles.push(files.data[i]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
744 libmodules.push(files.data[i]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
745 continue;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
746 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
747
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
748 if (FileName.equals(ext, global.lib_ext))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
749 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
750 global.params.libfiles.push(files.data[i]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
751 libmodules.push(files.data[i]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
752 continue;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
753 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
754
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
755 if (ext == global.ddoc_ext)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
756 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
757 global.params.ddocfiles.push(files.data[i]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
758 continue;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
759 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
760
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
761 version (TARGET_WINDOS) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
762 if (FileName.equals(ext, "res"))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
763 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
764 global.params.resfile = (cast(immutable(char)*)files.data[i])[0..0]; /// !!!
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
765 continue;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
766 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
767
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
768 if (FileName.equals(ext, "def"))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
769 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
770 global.params.deffile = (cast(immutable(char)*)files.data[i])[0..0];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
771 continue;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
772 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
773
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
774 if (FileName.equals(ext, "exe"))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
775 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
776 assert(0); // should have already been handled
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
777 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
778 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
779
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
780 /* Examine extension to see if it is a valid
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
781 * D source file extension
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
782 */
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
783 if (FileName.equals(ext, global.mars_ext) ||
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
784 FileName.equals(ext, global.hdr_ext) ||
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
785 FileName.equals(ext, "dd") ||
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
786 FileName.equals(ext, "htm") ||
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
787 FileName.equals(ext, "html") ||
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
788 FileName.equals(ext, "xhtml"))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
789 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
790 immutable(char)* e = ext.ptr;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
791 e--; // skip onto '.'
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
792 assert(*e == '.');
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
793
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
794 immutable(char)* n = p.ptr;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
795
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
796 name = n[0..(e-n)]; // strip extension
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
797
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
798 if (name.length == 0 || name == ".." || name == ".")
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
799 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
800 Linvalid:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
801 error("invalid file name '%s'", (cast(String)files.data[i]).str);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
802 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
803 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
804 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
805 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
806 { error("unrecognized file extension %s\n", ext);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
807 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
808 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
809 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
810 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
811 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
812 name = p;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
813 if (!*name)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
814 goto Linvalid;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
815 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
816
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
817 /* At this point, name is the D source file name stripped of
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
818 * its path and extension.
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
819 */
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
820
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
821 Identifier id = new Identifier(name, TOK.TOKreserved);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
822 m = new Module((cast(String) files.data[i]).str, id, global.params.doDocComments, global.params.doHdrGeneration);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
823 modules.push(cast(void*)m);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
824
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
825 if (firstmodule)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
826 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
827 global.params.objfiles.push(cast(void*)m.objfile.name);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
828 firstmodule = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
829 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
830 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
831
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
832 // Read files
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
833 //version = ASYNCREAD;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
834 version (ASYNCREAD) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
835 // Multi threaded
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
836 AsyncRead *aw = AsyncRead.create(modules.dim);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
837 for (i = 0; i < modules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
838 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
839 m = cast(Module *)modules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
840 aw.addFile(m.srcfile);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
841 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
842 aw.start();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
843 } else {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
844 // Single threaded
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
845 for (int i = 0; i < modules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
846 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
847 m = cast(Module)modules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
848 m.read(Loc(0));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
849 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
850 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
851
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
852 // Parse files
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
853 int anydocfiles = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
854 for (int i = 0; i < modules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
855 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
856 m = cast(Module)modules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
857 if (global.params.verbose)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
858 writef("parse %s\n", m.toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
859 if (!Module.rootModule)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
860 Module.rootModule = m;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
861 m.importedFrom = m;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
862 if (!global.params.oneobj || i == 0 || m.isDocFile)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
863 m.deleteObjFile();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
864 version (ASYNCREAD) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
865 if (aw.read(i))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
866 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
867 error("cannot read file %s", m.srcfile.name.toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
868 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
869 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
870
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
871 //while (loop) {}
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
872 m.parse();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
873 if (m.isDocFile)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
874 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
875 anydocfiles = 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
876 m.gendocfile();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
877
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
878 // Remove m from list of modules
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
879 modules.remove(i);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
880 i--;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
881
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
882 // Remove m's object file from list of object files
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
883 for (int j = 0; j < global.params.objfiles.dim; j++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
884 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
885 if (m.objfile.name.str == (cast(FileName)global.params.objfiles.data[j]).str)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
886 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
887 global.params.objfiles.remove(j);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
888 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
889 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
890 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
891
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
892 if (global.params.objfiles.dim == 0)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
893 global.params.link = 0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
894 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
895 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
896 version (ASYNCREAD) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
897 AsyncRead.dispose(aw);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
898 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
899
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
900 if (anydocfiles && modules.dim &&
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
901 (global.params.oneobj || global.params.objname))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
902 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
903 error("conflicting Ddoc and obj generation options");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
904 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
905 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
906 if (global.errors)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
907 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
908 version (_DH) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
909 if (global.params.doHdrGeneration)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
910 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
911 /* Generate 'header' import files.
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
912 * Since 'header' import files must be independent of command
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
913 * line switches and what else is imported, they are generated
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
914 * before any semantic analysis.
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
915 */
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
916 for (i = 0; i < modules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
917 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
918 m = cast(Module *)modules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
919 if (global.params.verbose)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
920 writef("import %s\n", m.toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
921 m.genhdrfile();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
922 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
923 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
924 if (global.errors)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
925 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
926 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
927
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
928 // Do semantic analysis
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
929 for (int i = 0; i < modules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
930 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
931 m = cast(Module)modules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
932 if (global.params.verbose)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
933 writef("semantic %s\n", m.toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
934 m.semantic();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
935 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
936 if (global.errors)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
937 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
938
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
939 // Do pass 2 semantic analysis
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
940 for (int i = 0; i < modules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
941 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
942 m = cast(Module)modules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
943 if (global.params.verbose)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
944 writef("semantic2 %s\n", m.toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
945 m.semantic2();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
946 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
947 if (global.errors)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
948 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
949
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
950 // Do pass 3 semantic analysis
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
951 for (int i = 0; i < modules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
952 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
953 m = cast(Module)modules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
954 if (global.params.verbose)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
955 writef("semantic3 %s\n", m.toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
956 m.semantic3();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
957 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
958 if (global.errors)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
959 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
960
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
961 if (global.params.moduleDeps !is null)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
962 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
963 assert(global.params.moduleDepsFile !is null);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
964
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
965 File deps = new File(global.params.moduleDepsFile);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
966 OutBuffer ob = global.params.moduleDeps;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
967 deps.setbuffer(cast(void*)ob.data, ob.offset);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
968 deps.writev();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
969 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
970
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
971
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
972 // Scan for functions to inline
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
973 if (global.params.useInline)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
974 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
975 /* The problem with useArrayBounds and useAssert is that the
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
976 * module being linked to may not have generated them, so if
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
977 * we inline functions from those modules, the symbols for them will
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
978 * not be found at link time.
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
979 */
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
980 if (!global.params.useArrayBounds && !global.params.useAssert)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
981 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
982 // Do pass 3 semantic analysis on all imported modules,
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
983 // since otherwise functions in them cannot be inlined
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
984 for (int i = 0; i < Module.amodules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
985 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
986 m = cast(Module)Module.amodules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
987 if (global.params.verbose)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
988 writef("semantic3 %s\n", m.toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
989 m.semantic3();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
990 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
991 if (global.errors)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
992 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
993 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
994
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
995 for (int i = 0; i < modules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
996 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
997 m = cast(Module)modules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
998 if (global.params.verbose)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
999 writef("inline scan %s\n", m.toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1000
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1001 m.inlineScan();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1002 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1003 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1004 if (global.errors)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1005 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1006
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1007 Library library = null;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1008 if (global.params.lib)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1009 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1010 library = new Library();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1011 library.setFilename(global.params.objdir, global.params.libname);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1012
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1013 // Add input object and input library files to output library
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1014 for (int i = 0; i < libmodules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1015 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1016 string p = (cast(String)libmodules.data[i]).str;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1017 library.addObject(p, null, 0);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1018 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1019 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1020
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1021 // Generate output files
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1022 if (global.params.oneobj)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1023 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1024 for (int i = 0; i < modules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1025 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1026 m = cast(Module)modules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1027 if (global.params.verbose)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1028 writef("code %s\n", m.toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1029 if (i == 0)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1030 obj_start(cast(char*)toStringz(m.srcfile.toChars()));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1031 m.genobjfile(0);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1032 if (!global.errors && global.params.doDocComments)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1033 m.gendocfile();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1034 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1035 if (!global.errors && modules.dim)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1036 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1037 obj_end(library, (cast(Module)modules.data[0]).objfile);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1038 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1039 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1040 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1041 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1042 for (int i = 0; i < modules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1043 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1044 m = cast(Module)modules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1045 if (global.params.verbose)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1046 writef("code %s\n", m.toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1047 if (global.params.obj)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1048 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1049 obj_start(cast(char*)toStringz(m.srcfile.toChars()));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1050 m.genobjfile(global.params.multiobj);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1051 obj_end(library, m.objfile);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1052 obj_write_deferred(library);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1053 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1054 if (global.errors)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1055 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1056 if (!global.params.lib)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1057 m.deleteObjFile();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1058 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1059 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1060 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1061 if (global.params.doDocComments)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1062 m.gendocfile();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1063 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1064 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1065 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1066
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1067 if (global.params.lib && !global.errors)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1068 library.write();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1069
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1070 backend_term();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1071 if (global.errors)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1072 fatal();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1073
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1074 if (!global.params.objfiles.dim)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1075 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1076 if (global.params.link)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1077 error("no object files to link");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1078 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1079 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1080 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1081 if (global.params.link)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1082 status = runLINK();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1083
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1084 if (global.params.run)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1085 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1086 if (!status)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1087 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1088 status = runProgram();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1089
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1090 /* Delete .obj files and .exe file
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1091 */
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1092 for (int i = 0; i < modules.dim; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1093 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1094 m = cast(Module)modules.data[i];
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1095 m.deleteObjFile();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1096 if (global.params.oneobj)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1097 break;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1098 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1099 deleteExeFile();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1100 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1101 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1102 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1103
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1104 return status;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1105 }