equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 Copyright (C) Original Authors (Kaehler, Scott Wallace and Dan Ingalls) |
4 Copyright (C) Original Authors (Kaehler, Scott Wallace and Dan Ingalls) |
3 Copyright (C) 2001 eXept Software AG |
5 Copyright (C) 2001 eXept Software AG |
4 |
6 |
5 Permission is hereby granted, free of charge, to any |
7 Permission is hereby granted, free of charge, to any |
119 |
121 |
120 #'*' |
122 #'*' |
121 'as in GLOB patterns (i.e. like filename patterns)' |
123 'as in GLOB patterns (i.e. like filename patterns)' |
122 |
124 |
123 #answerValue |
125 #answerValue |
124 'Enter result value here.\Can be a constant (like ''hello'')\or an expression, such as "Rectangle basicNew".' |
126 'Enter result value here.\Can be a constant (like ''hello'')\or a Smalltalk expression, such as "Rectangle basicNew".' |
125 |
127 |
126 #arg1Value |
128 #arg1Value |
127 'Enter a value for the first argument here.\Can be a constant or an expression.' |
129 'Enter a value for the first argument here.\Can be a constant or a Smalltalk expression.' |
128 |
130 |
129 #arg2Value |
131 #arg2Value |
130 'Enter a value for the second argument here.\Can be a constant or an expression.' |
132 'Enter a value for the second argument here.\Can be a constant or a Smalltalk expression.' |
131 |
133 |
132 #arg3Value |
134 #arg3Value |
133 'Enter a value for the third argument here.\Can be a constant or an expression.' |
135 'Enter a value for the third argument here.\Can be a constant or a Smalltalk expression.' |
134 |
136 |
135 #argumentCount |
137 #argumentCount |
136 'Specify the number of arguments here.' |
138 'Specify the number of arguments here.' |
137 |
139 |
138 #clearButton |
140 #clearButton |
140 |
142 |
141 #implementorsFound |
143 #implementorsFound |
142 'Shows a list of messages which deliver the result or match the selector pattern' |
144 'Shows a list of messages which deliver the result or match the selector pattern' |
143 |
145 |
144 #receiverValue |
146 #receiverValue |
145 'Enter a receiver value here.\Can be a constant (like ''hello'')\or an expression, such as "Rectangle basicNew".' |
147 'Enter a receiver value here.\Can be a constant (like ''hello'')\or a Smalltalk expression, such as "Rectangle basicNew".' |
146 |
148 |
147 #selectorPattern |
149 #selectorPattern |
148 'Enter a pattern to search by message name' |
150 'Enter a pattern to search by message name' |
149 |
151 |
150 #selectorPatternSearch |
152 #selectorPatternSearch |
1195 search2Levels |
1197 search2Levels |
1196 "Do an exhaustive search. |
1198 "Do an exhaustive search. |
1197 Given the original message, |
1199 Given the original message, |
1198 try applying all unary messages first to the receiver, |
1200 try applying all unary messages first to the receiver, |
1199 then to each argument. |
1201 then to each argument. |
1200 This takes O(N²) time - so be prepared" |
1202 This takes O(N²) time - so be prepared" |
1201 |
1203 |
1202 |tempReceiver tempAnswer tempArguments anArray resultArray receiverWithArgument mf| |
1204 |tempReceiver tempAnswer tempArguments anArray resultArray receiverWithArgument mf| |
1203 |
1205 |
1204 tempArguments := self argumentEditorsContents. |
1206 tempArguments := self argumentEditorsContents. |
1205 tempReceiver := self receiverEditorContents. |
1207 tempReceiver := self receiverEditorContents. |