44      Be aware, that the somewhat stupid 'optimization' of how the model is fetched may lead to

    44      Be aware, that the somewhat stupid 'optimization' of how the model is fetched may lead to

    45      a O(n*log n) or even O(n^2) behavior here.

    45      a O(n*log n) or even O(n^2) behavior here.

    46      *** to optimize: redefine by subClass"

    46      *** to optimize: redefine by subClass"

    47 

    47 

    48      thread isDead ifTrue:[ ^ #() ].

    48      thread isDead ifTrue:[ ^ #() ].

    49      ^ thread stack collect:[ :f | VDBFramePresenter new setFrame: f; parent: self ]

    50      ^ thread stack collect:[ :f | VDBFramePresenter new setFrame: f; parent: self ]

    50 

    51 

    51     "Created: / 21-09-2014 / 23:42:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"

    52     "Created: / 21-09-2014 / 23:42:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"

    53 ! !

    54 ! !

    54 

    55 

    55 !VDBThreadPresenter methodsFor:'testing'!

    56 !VDBThreadPresenter methodsFor:'testing'!

    56 

    57 

    57 isThreadPresenter

    58 isThreadPresenter