[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Help-smalltalk] [PATCH] JIT fixes
From: |
Paolo Bonzini |
Subject: |
[Help-smalltalk] [PATCH] JIT fixes |
Date: |
Wed, 19 Mar 2008 14:19:28 +0100 |
User-agent: |
Thunderbird 2.0.0.12 (Macintosh/20080213) |
Now works again, though I still get some crashes in `make check'. As
you can see, the bugs were really stupid...
Paolo
2008-03-19 Paolo Bonzini <address@hidden>
* libgst/prims.def: Mark VMpr_Process_suspend as a possible
source of interrupts.
* libgst/files.c: Load BlockClosure before the first closures
are executed (by the JIT).
diff --git a/libgst/files.c b/libgst/files.c
index e5e474a..e59bdf0 100644
--- a/libgst/files.c
+++ b/libgst/files.c
@@ -228,14 +228,14 @@ static const char standard_files[] = {
"ProcSched.st\0"
"Delay.st\0"
"SharedQueue.st\0"
- "Behavior.st\0"
- "ClassDesc.st\0"
- "Class.st\0"
- "Metaclass.st\0"
"ContextPart.st\0"
"MthContext.st\0"
"BlkContext.st\0"
"BlkClosure.st\0"
+ "Behavior.st\0"
+ "ClassDesc.st\0"
+ "Class.st\0"
+ "Metaclass.st\0"
"Continuation.st\0"
"Memory.st\0"
"MethodInfo.st\0"
diff --git a/libgst/prims.def b/libgst/prims.def
index 58842c5..02de21c 100644
--- a/libgst/prims.def
+++ b/libgst/prims.def
@@ -2814,7 +2814,7 @@ primitive VMpr_Semaphore_waitAfterSignalling
[succeed,check_interrupt]
}
/* Process suspend */
-primitive VMpr_Process_suspend [succeed]
+primitive VMpr_Process_suspend [succeed,check_interrupt]
{
OOP oop1;
_gst_primitives_executed++;
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Help-smalltalk] [PATCH] JIT fixes,
Paolo Bonzini <=