On 4 avr. 2014, at 12:37, Pharo4Stef <pharo4Stef@free.fr> wrote:
Thanks camille apparently I restarted from a clean image but may be I merged. Could you try loading the latest version of 12460 and let me know?
It works, but we still need to add 'process terminate' at the end. I open another bug entry (since it is not related to issue 12460).
On 04 Apr 2014, at 09:21, Camille Teruel <camille.teruel@gmail.com> wrote:
I tried on my machine in latest image and no matter how many times I run this test, this test still passes and I don't notice any slowdown nor image freeze. But I see the hanging processes. Adding 'process terminate' at the end works for me.
On 3 avr. 2014, at 19:41, Pharo4Stef <pharo4Stef@free.fr> wrote:
Hi guys
I need your brain cells.
When I execute the test
testBasic | context process debugger printedString | context := [ 20 factorial ] asContext.
process := Process forContext: context priority: Processor userInterruptPriority.
debugger := Smalltalk tools debugger new process: process controller: nil context: context. debugger stack expand.
self assert: debugger stack selectedIndex = 1. printedString := OpalCompiler isActive ifTrue: [ '[ 20 factorial ] in DebuggerTest>>testBasic'] ifFalse: [ '[...] in DebuggerTest>>testBasic' ]. self assert: debugger stack selectedItem printString = printedString.
debugger send. debugger send. self assert: debugger code getText = (Integer>>#factorial) sourceCode. self assert: debugger stack selectedItem printString = 'SmallInteger(Integer)>>factorial'.
two times my image (latest get totally unusable). I thought that may be the process should be terminated so I added
process terminate
But nothing changes. I tried to debug the code but not chance. I tried self halt after [ 20 factorial ] asContext.
I tried to execute the beginning in a workspace and not as a test to eliminate problem. But again no chance.
So did I miss something obvious?
Stef