equal
deleted
inserted
replaced
1004 "/ openInClass:(who methodClass) |
1004 "/ openInClass:(who methodClass) |
1005 "/ selector:(who methodSelector) |
1005 "/ selector:(who methodSelector) |
1006 "/ ]. |
1006 "/ ]. |
1007 "/ listView1 middleButtonMenu:menu. |
1007 "/ listView1 middleButtonMenu:menu. |
1008 |
1008 |
1009 nm := (method whoString) asText emphasizeAllWith:(#color->Color blue). |
1009 nm := (method whoString) colorizeAllWith:Color blue. |
1010 ]. |
1010 ]. |
1011 entry1 := InfoRow new. |
1011 entry1 := InfoRow new. |
1012 entry1 name:'Compiled method'; value:nm. |
1012 entry1 name:'Compiled method'; value:nm. |
1013 |
1013 |
1014 entry2 := InfoRow new. |
1014 entry2 := InfoRow new. |
1034 "/ listView1 middleButtonMenu:menu. |
1034 "/ listView1 middleButtonMenu:menu. |
1035 "/ |
1035 "/ |
1036 list := (module functions select:[:f | f notNil]) |
1036 list := (module functions select:[:f | f notNil]) |
1037 collect:[:f | |entry| |
1037 collect:[:f | |entry| |
1038 entry := InfoRow new. |
1038 entry := InfoRow new. |
1039 entry name:(f name asText emphasizeAllWith:(#color->Color blue)). |
1039 entry name:(f name colorizeAllWith:Color blue). |
1040 entry value:('address: (16r) ' , (f code address hexPrintString leftPaddedTo:8 with:$0)). |
1040 entry value:('address: (16r) ' , (f code address hexPrintString leftPaddedTo:8 with:$0)). |
1041 entry |
1041 entry |
1042 ]. |
1042 ]. |
1043 self infoTable2ListHolder value:list. |
1043 self infoTable2ListHolder value:list. |
1044 self table1VisibleHolder value:false. |
1044 self table1VisibleHolder value:false. |