equal
deleted
inserted
replaced
63 self ensureIsValid. |
63 self ensureIsValid. |
64 variables isNil ifTrue:[ |
64 variables isNil ifTrue:[ |
65 variables := GDBTransientDataHolder debugger: debugger factory:[ |
65 variables := GDBTransientDataHolder debugger: debugger factory:[ |
66 | result | |
66 | result | |
67 |
67 |
68 result := debugger send: (GDBMI_stack_list_variables new arguments: { '--thread' . thread id . '--frame' . level . '--no-values' }). |
68 result := debugger send: (GDBMI_stack_list_variables new arguments: { '--thread' . thread id . '--frame' . level . '--simple-values' }). |
69 (result propertyAt: #variables) |
69 (result propertyAt: #variables) |
70 do:[ :each | each debugger: debugger ]; |
70 do:[ :each | each setFrame: self ]; |
71 yourself |
71 yourself |
72 ]. |
72 ]. |
73 ]. |
73 ]. |
74 ^ variables value |
74 ^ variables value |
75 |
75 |
76 "Created: / 27-02-2015 / 14:56:22 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
76 "Created: / 27-02-2015 / 14:56:22 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
77 "Modified: / 28-02-2015 / 01:04:36 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
77 ! ! |
78 ! ! |
78 |
79 |
79 !GDBFrame methodsFor:'printing & storing'! |
80 !GDBFrame methodsFor:'printing & storing'! |
80 |
81 |
81 displayString |
82 displayString |