hg/stx-goodies-smallsense: SmallSense__CompletionEngine.st@43bee6463c53 (annotated)

117 441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	1	"{ Package: 'jv:smallsense' }"
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	2
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	3	"{ NameSpace: SmallSense }"
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	4
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	5	Object subclass:#CompletionEngine
157 c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	6	instanceVariableNames:'codeView result context'
117 441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	7	classVariableNames:''
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	8	poolDictionaries:''
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	9	category:'SmallSense-Core'
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	10	!
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	11
147 5c835893f71b New class search completion for browser's search bar moved to SmallSense. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 136 diff changeset	12
187 7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	13	!CompletionEngine class methodsFor:'accessing'!
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	14
192 f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	15	exactMatcher
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	16	"Return a match block returning true, if given selector start with given prefix"
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	17
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	18	^ [ :prefix :selector \| selector startsWith: prefix ]
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	19
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	20	"Created: / 08-04-2014 / 21:31:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	21	!
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	22
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	23	inexactMatcher
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	24	"Return a match block returning true, if given prefix matches given selector"
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	25
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	26	^ [ :prefix :selector \|
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	27	prefix size < 5 ifTrue:[
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	28	selector startsWith: prefix.
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	29	] ifFalse:[
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	30	\| part \|
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	31
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	32	part := selector copyTo: (prefix size min: selector size).
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	33	(prefix levenshteinTo: part) < 15
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	34	].
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	35	].
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	36
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	37	"Created: / 08-04-2014 / 21:30:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	38	!
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	39
187 7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	40	matcher
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	41	"Return a match block returning true, if given prefix matches given selector"
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	42
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	43	^ [ :prefix :selector \|
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	44	prefix size < 5 ifTrue:[
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	45	selector startsWith: prefix.
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	46	] ifFalse:[
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	47	\| part \|
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	48
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	49	part := selector copyTo: (prefix size min: selector size).
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	50	(prefix levenshteinTo: part) < 15
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	51	].
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	52	].
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	53
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	54	"Created: / 02-04-2014 / 23:30:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	55	! !
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	56
117 441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	57	!CompletionEngine class methodsFor:'testing'!
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	58
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	59	isAbstract
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	60	^ self == CompletionEngine
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	61
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	62	"Created: / 02-10-2013 / 13:11:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	63	! !
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	64
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	65	!CompletionEngine methodsFor:'completion'!
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	66
157 c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	67	complete: aCompletionContext
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	68	"Compute completion for given completion context, taking all the information
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	69	from it. Returns a CompletionResult with computed completions"
117 441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	70
157 c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	71	context := aCompletionContext.
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	72	result := CompletionResult new.
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	73	codeView := context codeView.
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	74	result context: context.
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	75	^ self complete.
117 441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	76
157 c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	77	"Created: / 21-01-2014 / 23:07:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
117 441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	78	!
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	79
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	80	completeFor: aCodeView2OrTextEditView
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	81	"Compute completion for given codeView, taking all the information
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	82	from it. Returns a CompletionResult with computed completions"
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	83
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	84	codeView := aCodeView2OrTextEditView.
118 88e6fd734a11 Some more fixes in complete-as-you-type support... Jan Vrany <jan.vrany@fit.cvut.cz> parents: 117 diff changeset	85	result := CompletionResult new.
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	86
117 441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	87	^ self complete.
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	88
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	89	"Created: / 02-10-2013 / 13:24:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	90	"Modified: / 03-10-2013 / 16:42:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
117 441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	91	! !
441529422c2f Completion support refactored to make it more pluggable/extendable. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	92
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	93	!CompletionEngine methodsFor:'completion-individual'!
4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	94
4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	95	addMethodsStartingWith: prefix
192 f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	96	^ self addMethodsStartingWith: prefix stripOff: nil filter: nil
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	97
4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	98	"Created: / 24-07-2013 / 13:10:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
192 f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	99	"Modified: / 08-04-2014 / 21:36:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	100	!
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	101
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	102	addMethodsStartingWith: prefix stripOff: stripoffPrefix
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	103	^ self addMethodsStartingWith: prefix stripOff: stripoffPrefix filter: nil
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	104
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	105	"Created: / 08-04-2014 / 21:36:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	106	!
4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	107
192 f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	108	addMethodsStartingWith: prefix stripOff: stripoffPrefix filter: filterOrNil
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	109	\| matcher \|
187 7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	110
192 f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	111	matcher := stripoffPrefix isEmptyOrNil ifTrue:[ CompletionEngine inexactMatcher ] ifFalse:[ CompletionEngine exactMatcher ].
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	112	^ self addMethodsStartingWith: prefix stripOff: stripoffPrefix filter: filterOrNil matcher: matcher.
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	113
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	114	"Created: / 08-04-2014 / 21:35:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
187 7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	115	!
7baeeea7d8ae Fixes issue #4 - Use levenshtein distance when computing prefix-based selector completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 176 diff changeset	116
192 f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	117	addMethodsStartingWith: prefix stripOff: stripoffPrefix filter: filterOrNil matcher: matcher
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	118	\| matchPrefix selectors filter \|
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	119
4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	120	selectors := Dictionary new.
192 f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	121	matchPrefix := stripoffPrefix isNil ifTrue:[ prefix ] ifFalse:[ stripoffPrefix , prefix ].
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	122	filter := filterOrNil isNil ifTrue:[ [:method \| true ] ] ifFalse:[ filterOrNil ].
4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	123
205 43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	124	context environment allMethodsWithSelectorDo:[:mthd :selector\|
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	125	(mthd isSynthetic not and:[(filter value: mthd) and:[ matcher value: matchPrefix value: selector]]) ifTrue:[
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	126	\| class skip \|
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	127
205 43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	128	class := mthd mclass superclass.
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	129	skip := false.
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	130	[ skip not and:[class notNil] ] whileTrue:[
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	131	(class methodDictionary includesKey: selector) ifTrue:[
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	132	skip := true.
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	133	].
205 43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	134	class := class superclass.
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	135	].
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	136	skip ifFalse:[
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	137	\| classes \|
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	138
205 43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	139	classes := selectors at: selector ifAbsentPut:[ Set new ].
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	140	(classes includes: mthd mclass) ifFalse:[
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	141	classes add: mthd mclass.
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	142	].
205 43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	143	].
43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	144	]
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	145	].
4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	146
205 43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	147
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	148	selectors keysAndValuesDo: [:selector :classes\|
4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	149	result add:(MethodPO
4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	150	name:selector
192 f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	151	class:(classes size == 1 ifTrue:[classes anElement] ifFalse:[classes])
f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	152	stripOff: stripoffPrefix)
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	153	]
4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	154
192 f27ce6dac101 Initial support for completing selector parts. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 187 diff changeset	155	"Created: / 08-04-2014 / 21:34:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
205 43bee6463c53 Introduced notion of `environment` to completion context. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 192 diff changeset	156	"Modified: / 13-05-2014 / 12:30:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
120 4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	157	! !
4fefce92f5bb Initial support for Java/Groovy completion and for mixed-language completion. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 118 diff changeset	158
157 c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	159	!CompletionEngine methodsFor:'completion-private'!
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	160
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	161	complete
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	162	"Compute completion for `codeView`, taking all the information
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	163	from it. Returns a CompletionResult with computed completions"
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	164
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	165	^ self subclassResponsibility
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	166
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	167	"Modified (comment): / 02-10-2013 / 13:33:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	168	! !
c71d2e62ece2 Refactored API of CompletionEngine - caller now must set up an context pass it. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 147 diff changeset	169
147 5c835893f71b New class search completion for browser's search bar moved to SmallSense. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 136 diff changeset	170	!CompletionEngine class methodsFor:'documentation'!
5c835893f71b New class search completion for browser's search bar moved to SmallSense. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 136 diff changeset	171
5c835893f71b New class search completion for browser's search bar moved to SmallSense. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 136 diff changeset	172	version_HG
5c835893f71b New class search completion for browser's search bar moved to SmallSense. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 136 diff changeset	173
5c835893f71b New class search completion for browser's search bar moved to SmallSense. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 136 diff changeset	174	^ '$Changeset: <not expanded> $'
5c835893f71b New class search completion for browser's search bar moved to SmallSense. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 136 diff changeset	175	! !
5c835893f71b New class search completion for browser's search bar moved to SmallSense. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 136 diff changeset	176

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Tue, 13 May 2014 16:34:38 +0100
changeset 205	43bee6463c53
parent 192	f27ce6dac101
child 210	1922d415c704
permissions	-rw-r--r--