From 47b17915d57f5c6dc4e8d5d90255648ba306890a Mon Sep 17 00:00:00 2001 From: Chris Lattner Date: Sat, 13 Apr 2002 19:52:54 +0000 Subject: [PATCH] * Give alloca's for pool descriptors better names than "pool". * Fill in the pool descriptor links in the pool descriptors. llvm-svn: 2239 --- lib/Transforms/IPO/OldPoolAllocate.cpp | 33 ++++++++++++++++++++++---- 1 file changed, 28 insertions(+), 5 deletions(-) diff --git a/lib/Transforms/IPO/OldPoolAllocate.cpp b/lib/Transforms/IPO/OldPoolAllocate.cpp index 24a51c298ff..1d1e2fe14c7 100644 --- a/lib/Transforms/IPO/OldPoolAllocate.cpp +++ b/lib/Transforms/IPO/OldPoolAllocate.cpp @@ -1183,8 +1183,9 @@ void PoolAllocate::CreatePools(Function *F, const vector &Allocs, "Pool type should not be abstract anymore!"); // Add an allocation and a free for each pool... - AllocaInst *PoolAlloc = new AllocaInst(PointerType::get(PI.PoolType), - 0, "pool"); + AllocaInst *PoolAlloc + = new AllocaInst(PointerType::get(PI.PoolType), 0, + CurModule->getTypeName(PI.PoolType)); PI.Handle = PoolAlloc; EntryNodeInsts.push_back(PoolAlloc); AllocationInst *AI = Allocs[i]->getAllocation(); @@ -1201,9 +1202,6 @@ void PoolAllocate::CreatePools(Function *F, const vector &Allocs, Args.push_back(PoolAlloc); // Pool to initialize EntryNodeInsts.push_back(new CallInst(PoolInit, Args)); - // FIXME: add code to initialize inter pool links - cerr << "TODO: add code to initialize inter pool links!\n"; - // Add code to destroy the pool in all of the exit nodes of the function... Args.clear(); Args.push_back(PoolAlloc); // Pool to initialize @@ -1217,6 +1215,31 @@ void PoolAllocate::CreatePools(Function *F, const vector &Allocs, } } + // Now that all of the pool descriptors have been created, link them together + // so that called functions can get links as neccesary... + // + for (unsigned i = 0, e = Allocs.size(); i != e; ++i) { + PoolInfo &PI = PoolDescs[Allocs[i]]; + + // For every pointer in the data structure, initialize a link that + // indicates which pool to access... + // + vector Indices(2); + Indices[0] = ConstantUInt::get(Type::UIntTy, 0); + for (unsigned l = 0, le = PI.Node->getNumLinks(); l != le; ++l) + // Only store an entry for the field if the field is used! + if (!PI.Node->getLink(l).empty()) { + assert(PI.Node->getLink(l).size() == 1 && "Should have only one link!"); + PointerVal PV = PI.Node->getLink(l)[0]; + assert(PV.Index == 0 && "Subindexing not supported yet!"); + PoolInfo &LinkedPool = PoolDescs[PV.Node]; + Indices[1] = ConstantUInt::get(Type::UByteTy, 1+l); + + EntryNodeInsts.push_back(new StoreInst(LinkedPool.Handle, PI.Handle, + Indices)); + } + } + // Insert the entry node code into the entry block... F->getEntryNode()->getInstList().insert(F->getEntryNode()->begin()+1, EntryNodeInsts.begin(),