equal
deleted
inserted
replaced
38 ! |
38 ! |
39 |
39 |
40 stack |
40 stack |
41 self ensureIsStopped. |
41 self ensureIsStopped. |
42 stack isNil ifTrue:[ |
42 stack isNil ifTrue:[ |
43 | result depth | |
43 stack := GDBTransientDataHolder debugger: debugger factory:[ |
44 result := debugger send: (GDBMI_stack_info_depth new arguments: { '--thread' . id . 100 }). |
44 | result depth | |
45 depth := result propertyAt: #depth. |
45 result := debugger send: (GDBMI_stack_info_depth new arguments: { '--thread' . id . 100 }). |
46 result := debugger send: (GDBMI_stack_list_frames new arguments: { '--thread' . id . 0 . depth - 1 }). |
46 depth := result propertyAt: #depth. |
47 stack := result propertyAt: #stack. |
47 result := debugger send: (GDBMI_stack_list_frames new arguments: { '--thread' . id . 0 . depth - 1 }). |
|
48 result propertyAt: #stack. |
|
49 ]. |
48 ]. |
50 ]. |
49 ^ stack |
51 ^ stack value |
50 |
52 |
51 "Created: / 09-09-2014 / 00:02:45 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
53 "Created: / 09-09-2014 / 00:02:45 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
52 "Modified: / 17-09-2014 / 00:02:49 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
54 "Modified: / 17-09-2014 / 22:12:12 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
53 ! |
55 ! |
54 |
56 |
55 status |
57 status |
56 ^ status |
58 ^ status |
57 ! ! |
59 ! ! |