replica
/
hanchenye-llvm-project
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Output forward definitions of global vars to handle recursive intializers correctly. 

llvm-svn: 3391
This commit is contained in:
Chris Lattner 2002-08-19 21:48:40 +00:00
parent 8858f0272d
commit b5815279c6
1 changed files with 39 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
llvm/lib/CWriter/Writer.cpp
View File

@ -414,12 +414,35 @@ void CWriter::printModule(Module *M) {
<< "#ifndef NULL\n#define NULL 0\n#endif\n\n"
<< "typedef unsigned char bool;\n"
<< "\n\n/* Global Symbols */\n";
<< "\n\n/* Global Declarations */\n";
// First output all the declarations for the program, because C requires
// Functions & globals to be declared before they are used.
//
// Loop over the symbol table, emitting all named constants...
if (M->hasSymbolTable())
printSymbolTable(*M->getSymbolTable());
// Global variable declarations...
if (!M->gempty()) {
Out << "\n/* Global Variable Declarations */\n";
for (Module::giterator I = M->gbegin(), E = M->gend(); I != E; ++I) {
Out << (I->hasExternalLinkage() ? "extern " : "static ");
printType(I->getType()->getElementType(), getValueName(I));
Out << ";\n";
}
}
// Function declarations
if (!M->empty()) {
Out << "\n/* Function Declarations */\n";
for (Module::iterator I = M->begin(), E = M->end(); I != E; ++I)
printFunctionDecl(I);
}
// Output the global variable contents...
if (!M->gempty()) {
Out << "\n\n/* Global Data */\n";
for (Module::giterator I = M->gbegin(), E = M->gend(); I != E; ++I) {
if (I->hasInternalLinkage()) Out << "static ";
@ -431,19 +454,15 @@ void CWriter::printModule(Module *M) {
}
Out << ";\n";
}
// First output all the declarations of the functions as C requires Functions
// be declared before they are used.
//
Out << "\n\n/* Function Declarations */\n";
for (Module::iterator I = M->begin(), E = M->end(); I != E; ++I)
printFunctionDecl(I);
}
// Output all of the functions...
if (!M->empty()) {
Out << "\n\n/* Function Bodies */\n";
for (Module::iterator I = M->begin(), E = M->end(); I != E; ++I)
printFunction(I);
}
}
// printSymbolTable - Run through symbol table looking for named constants