ExternalVendorCode/corda
1
0
Fork 0
mirror of https://github.com/corda/corda.git synced 2025-01-07 13:38:47 +00:00
Code Issues Actions 2 Packages Projects Releases Wiki Activity

handle case of visiting thread when it is executing one of the transition procedures

Browse Source
This commit is contained in:
Joel Dice 2008-04-22 09:31:40 -06:00
parent df5258d1d8
commit c7d679467f
1 changed files with 32 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
src/compile.cpp
View File

@ -4689,6 +4689,11 @@ class SegFaultHandler: public System::SignalHandler {
Machine* m; Machine* m;
}; };
class MyProcessor;
MyProcessor*
processor(MyThread* t);
class MyProcessor: public Processor { class MyProcessor: public Processor {
public: public:
class CodeAllocator: public Allocator { class CodeAllocator: public Allocator {
@ -5000,6 +5005,9 @@ class MyProcessor: public Processor {
MyThread* t = static_cast<MyThread*>(vmt); MyThread* t = static_cast<MyThread*>(vmt);
MyThread* target = static_cast<MyThread*>(vmTarget); MyThread* target = static_cast<MyThread*>(vmTarget);
processor(t)->getDefaultCompiled(t);
processor(t)->getNativeCompiled(t);
class Visitor: public System::ThreadVisitor { class Visitor: public System::ThreadVisitor {
public: public:
Visitor(MyThread* t, MyThread* target): t(t), target(target) { } Visitor(MyThread* t, MyThread* target): t(t), target(target) { }
@ -5015,6 +5023,30 @@ class MyProcessor: public Processor {
target->ip = ip; target->ip = ip;
target->base = base; target->base = base;
target->stack = stack; target->stack = stack;
} else {
MyProcessor* p = processor(t);
uint8_t* default_ = reinterpret_cast<uint8_t*>
(&singletonValue(t, p->defaultCompiled, 0));
unsigned defaultSize = singletonLength(t, p->defaultCompiled);
uint8_t* native = reinterpret_cast<uint8_t*>
(&singletonValue(t, p->nativeCompiled, 0));
unsigned nativeSize = singletonLength(t, p->nativeCompiled);
if ((static_cast<uint8_t*>(ip) >= p->indirectCaller
and static_cast<uint8_t*>(ip)
< p->indirectCaller + p->indirectCallerSize)
or (static_cast<uint8_t*>(ip) >= default_
and static_cast<uint8_t*>(ip) < default_ + defaultSize)
or (static_cast<uint8_t*>(ip) >= native
and static_cast<uint8_t*>(ip) < native + nativeSize))
{
target->base = base;
target->stack = stack;
}
} }
t->tracing = true; t->tracing = true;