need help to fix the test: testEvaluationOfSelfSend

testEvaluationOfSelfSend
        "Tests the evaluation of an inherited method that uses super send
        and self send"
        | result editor |
        editor := self method asText asMorph editor.
        result := Compiler new
                                evaluate: (self method copyFrom: 6 to: self method size)
                                in: self model doItContext
                                to: self model doItReceiver
                                notifying: editor
                                ifFail: [FakeClassPool adopt: nil.
                                        ^ #failedDoit]
                                logged: true.
        self assert: result = (6250 / 3)

Hi guys this test loses me.
Can somebody have a look? I probably misses something obvious.

Stef