equal
deleted
inserted
replaced
45 |
45 |
46 baseInspectedObjectClass |
46 baseInspectedObjectClass |
47 |
47 |
48 | cls | |
48 | cls | |
49 cls := inspectedObject class. |
49 cls := inspectedObject class. |
50 [ cls name startsWith: 'java/util/' ] whileFalse:[ |
50 [ cls binaryName startsWith: 'java/util/' ] whileFalse:[ |
51 cls := cls superclass. |
51 cls := cls superclass. |
52 ]. |
52 ]. |
53 ^cls. |
53 ^cls. |
54 |
54 |
55 "Created: / 04-12-2011 / 17:02:20 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
55 "Created: / 04-12-2011 / 17:02:20 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
56 "Modified: / 25-07-2014 / 09:39:41 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
56 ! |
57 ! |
57 |
58 |
58 indexList |
59 indexList |
59 "return a list of indexes to show in the selectionList. |
60 "return a list of indexes to show in the selectionList. |
60 Set hasMore to true, if a '...' entry should be added." |
61 Set hasMore to true, if a '...' entry should be added." |