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