equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 2010 by Jan Vrany, SWING Research Group. CTU in Prague |
4 COPYRIGHT (c) 2010 by Jan Vrany, SWING Research Group. CTU in Prague |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 Permission is hereby granted, free of charge, to any person |
7 Permission is hereby granted, free of charge, to any person |
114 |
116 |
115 methodLabel |
117 methodLabel |
116 |
118 |
117 ^(self isBlock ifTrue:['[] in '] ifFalse:['']), |
119 ^(self isBlock ifTrue:['[] in '] ifFalse:['']), |
118 (self selector ? '???') , |
120 (self selector ? '???') , |
119 (' [' , (self methodClass isNil ifTrue:['???'] ifFalse:[self methodClass nameWithoutPrefix]) , ']') asText allBold |
121 (' [' , (self methodClass isNil |
|
122 ifTrue:['???'] |
|
123 ifFalse:[self methodClass nameWithoutPrefix]) , ']') allBold |
120 |
124 |
121 "Created: / 01-12-2007 / 20:56:29 / janfrog" |
125 "Created: / 01-12-2007 / 20:56:29 / janfrog" |
122 "Modified: / 01-12-2007 / 23:58:35 / janfrog" |
126 "Modified: / 01-12-2007 / 23:58:35 / janfrog" |
123 "Modified: / 18-10-2011 / 17:04:16 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
127 "Modified: / 18-10-2011 / 17:04:16 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
128 "Modified: / 13-03-2019 / 22:15:04 / Claus Gittinger" |
124 ! |
129 ! |
125 |
130 |
126 packageLabel |
131 packageLabel |
127 |pkg| |
132 |pkg| |
128 |
133 |
129 pkg := method isNil ifTrue:['???'] ifFalse:[method package]. |
134 pkg := method isNil ifTrue:['???'] ifFalse:[method package]. |
130 ^('[' , pkg , ']') asText allItalic |
135 ^('[' , pkg , ']') allItalic |
131 |
136 |
132 "Created: / 01-12-2007 / 20:58:18 / janfrog" |
137 "Created: / 01-12-2007 / 20:58:18 / janfrog" |
|
138 "Modified: / 13-03-2019 / 22:15:08 / Claus Gittinger" |
133 ! |
139 ! |
134 |
140 |
135 selector |
141 selector |
136 |
142 |
137 | mthd | |
143 | mthd | |