Mercurial > projects > ldc
annotate gen/logger.cpp @ 1169:2bff538fa3b9
Automated merge with http://hg.dsource.org/projects/ldc
author | Christian Kamm <kamm incasoftware de> |
---|---|
date | Sun, 29 Mar 2009 11:44:32 +0200 |
parents | e7f0c2b48047 |
children | 2292878925f4 |
rev | line source |
---|---|
1 | 1 #include <cassert> |
2 #include <cstdarg> | |
3 #include <cstdio> | |
4 #include <cstdlib> | |
38
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
5 #include <fstream> |
1 | 6 #include <string> |
7 | |
132 | 8 #include "mars.h" |
9 | |
986
a8cb25d478c4
Use LLVM-style command line (instead of DMD-style)
Frits van Bommel <fvbommel wxs.nl>
parents:
794
diff
changeset
|
10 #include "llvm/Support/CommandLine.h" |
4
e116aa1488e6
[svn r8] changed backend includes to always use the gen/<foo>.h prefix
lindquist
parents:
1
diff
changeset
|
11 #include "gen/logger.h" |
1 | 12 |
13 namespace Logger | |
14 { | |
15 static std::string indent_str; | |
38
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
16 |
986
a8cb25d478c4
Use LLVM-style command line (instead of DMD-style)
Frits van Bommel <fvbommel wxs.nl>
parents:
794
diff
changeset
|
17 llvm::cl::opt<bool> _enabled("vv", |
a8cb25d478c4
Use LLVM-style command line (instead of DMD-style)
Frits van Bommel <fvbommel wxs.nl>
parents:
794
diff
changeset
|
18 llvm::cl::desc("Very verbose"), |
a8cb25d478c4
Use LLVM-style command line (instead of DMD-style)
Frits van Bommel <fvbommel wxs.nl>
parents:
794
diff
changeset
|
19 llvm::cl::ZeroOrMore); |
a8cb25d478c4
Use LLVM-style command line (instead of DMD-style)
Frits van Bommel <fvbommel wxs.nl>
parents:
794
diff
changeset
|
20 |
1 | 21 void indent() |
22 { | |
131 | 23 if (_enabled) { |
102
027b8d8b71ec
[svn r106] Turns out the last commit wasn't enough, now the D->LLVM process is even more split up.
lindquist
parents:
94
diff
changeset
|
24 indent_str += "* "; |
027b8d8b71ec
[svn r106] Turns out the last commit wasn't enough, now the D->LLVM process is even more split up.
lindquist
parents:
94
diff
changeset
|
25 } |
1 | 26 } |
27 void undent() | |
28 { | |
131 | 29 if (_enabled) { |
38
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
30 assert(!indent_str.empty()); |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
31 indent_str.resize(indent_str.size()-2); |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
32 } |
1 | 33 } |
994
18ad5601dff7
Use LLVM OStream wrapper instead of <iostream> in the logger.
Frits van Bommel <fvbommel wxs.nl>
parents:
986
diff
changeset
|
34 llvm::OStream cout() |
1 | 35 { |
131 | 36 if (_enabled) |
994
18ad5601dff7
Use LLVM OStream wrapper instead of <iostream> in the logger.
Frits van Bommel <fvbommel wxs.nl>
parents:
986
diff
changeset
|
37 return llvm::cout << indent_str; |
38
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
38 else |
994
18ad5601dff7
Use LLVM OStream wrapper instead of <iostream> in the logger.
Frits van Bommel <fvbommel wxs.nl>
parents:
986
diff
changeset
|
39 return 0; |
1 | 40 } |
41 void println(const char* fmt,...) | |
42 { | |
131 | 43 if (_enabled) { |
794
661384d6a936
Fix warnings on x86-64. By fvbommel.
Christian Kamm <kamm incasoftware de>
parents:
246
diff
changeset
|
44 printf("%s", indent_str.c_str()); |
38
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
45 va_list va; |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
46 va_start(va,fmt); |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
47 vprintf(fmt,va); |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
48 va_end(va); |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
49 printf("\n"); |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
50 } |
1 | 51 } |
52 void print(const char* fmt,...) | |
53 { | |
131 | 54 if (_enabled) { |
794
661384d6a936
Fix warnings on x86-64. By fvbommel.
Christian Kamm <kamm incasoftware de>
parents:
246
diff
changeset
|
55 printf("%s", indent_str.c_str()); |
38
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
56 va_list va; |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
57 va_start(va,fmt); |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
58 vprintf(fmt,va); |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
59 va_end(va); |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
60 } |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
61 } |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
62 void enable() |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
63 { |
131 | 64 _enabled = true; |
38
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
65 } |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
66 void disable() |
27b2f40bdb58
[svn r42] Disabled the extensive logging by default. Use the -vv flag to get it back.
lindquist
parents:
4
diff
changeset
|
67 { |
131 | 68 _enabled = false; |
69 } | |
70 bool enabled() | |
71 { | |
72 return _enabled; | |
1 | 73 } |
1124
e7f0c2b48047
Fix a bug where ::warning() was called with a va_list argument instead of an
Frits van Bommel <fvbommel wxs.nl>
parents:
994
diff
changeset
|
74 void attention(Loc loc, const char* fmt,...) |
94
61615fa85940
[svn r98] Added support for std.c.stdlib.alloca via pragma(LLVM_internal, "alloca").
lindquist
parents:
86
diff
changeset
|
75 { |
61615fa85940
[svn r98] Added support for std.c.stdlib.alloca via pragma(LLVM_internal, "alloca").
lindquist
parents:
86
diff
changeset
|
76 va_list va; |
61615fa85940
[svn r98] Added support for std.c.stdlib.alloca via pragma(LLVM_internal, "alloca").
lindquist
parents:
86
diff
changeset
|
77 va_start(va,fmt); |
1124
e7f0c2b48047
Fix a bug where ::warning() was called with a va_list argument instead of an
Frits van Bommel <fvbommel wxs.nl>
parents:
994
diff
changeset
|
78 vwarning(loc,fmt,va); |
94
61615fa85940
[svn r98] Added support for std.c.stdlib.alloca via pragma(LLVM_internal, "alloca").
lindquist
parents:
86
diff
changeset
|
79 va_end(va); |
61615fa85940
[svn r98] Added support for std.c.stdlib.alloca via pragma(LLVM_internal, "alloca").
lindquist
parents:
86
diff
changeset
|
80 } |
1 | 81 } |