From 70cc3397f84c2e1fd69c059a0ef89e398e847b00 Mon Sep 17 00:00:00 2001 From: Chris Lattner Date: Mon, 10 Sep 2001 07:58:01 +0000 Subject: Implement global variable support git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@530 91177308-0d34-0410-b5e6-96231b3b80d8 --- lib/Bytecode/Reader/Reader.cpp | 22 ++++++++++++++++++++-- 1 file changed, 20 insertions(+), 2 deletions(-) (limited to 'lib/Bytecode/Reader') diff --git a/lib/Bytecode/Reader/Reader.cpp b/lib/Bytecode/Reader/Reader.cpp index 540768383a..eab576e541 100644 --- a/lib/Bytecode/Reader/Reader.cpp +++ b/lib/Bytecode/Reader/Reader.cpp @@ -12,6 +12,7 @@ #include "llvm/Bytecode/Reader.h" #include "llvm/Bytecode/Format.h" +#include "llvm/GlobalVariable.h" #include "llvm/Module.h" #include "llvm/BasicBlock.h" #include "llvm/DerivedTypes.h" @@ -312,10 +313,28 @@ bool BytecodeParser::ParseMethod(const uchar *&Buf, const uchar *EndBuf, bool BytecodeParser::ParseModuleGlobalInfo(const uchar *&Buf, const uchar *End, Module *C) { - if (!MethodSignatureList.empty()) return failure(true); // Two ModuleGlobal blocks? + // Read global variables... + unsigned VarType; + if (read_vbr(Buf, End, VarType)) return failure(true); + while (VarType != Type::VoidTyID) { // List is terminated by Void + const Type *Ty = getType(VarType); + if (!Ty || !Ty->isPointerType()) { + cerr << "Global not pointer type! Ty = " << Ty << endl; + return failure(true); + } + + // Create the global variable... + GlobalVariable *GV = new GlobalVariable(Ty); + insertValue(GV, ModuleValues); + C->getGlobalList().push_back(GV); + + if (read_vbr(Buf, End, VarType)) return failure(true); + BCR_TRACE(2, "Global Variable of type: " << Ty->getDescription() << endl); + } + // Read the method signatures for all of the methods that are coming, and // create fillers in the Value tables. unsigned MethSignature; @@ -324,7 +343,6 @@ bool BytecodeParser::ParseModuleGlobalInfo(const uchar *&Buf, const uchar *End, const Type *Ty = getType(MethSignature); if (!Ty || !Ty->isMethodType()) { cerr << "Method not meth type! Ty = " << Ty << endl; - if (Ty) cerr << Ty->getName(); else cerr << MethSignature; cerr << endl; return failure(true); } -- cgit v1.2.3-70-g09d2