--- a/SmallSense__SmalltalkCompletionEngine.st	Sat Oct 05 00:40:01 2013 +0100
+++ b/SmallSense__SmalltalkCompletionEngine.st	Sat Oct 05 01:02:31 2013 +0100
@@ -288,6 +288,34 @@
 
 !SmalltalkCompletionEngine methodsFor:'completion-private'!
 
+complete: mode source: source class: class line: lineNrArg column: colNrArg 
+    | inferencer lineNr colNr |
+
+    mode == #method ifTrue:[
+        lineNr := lineNrArg.
+        colNr := colNrArg.
+        inferencer := SmalltalkInferencer forClass: class methodSource: source asString.
+    ] ifFalse:[
+        | line |
+
+        lineNr := 1.
+        colNr := colNrArg.
+        line := codeView list at: lineNrArg.
+        line isEmptyOrNil ifTrue:[ ^ nil ].
+        inferencer := SmalltalkInferencer forExpression: line.
+    ].
+    inferencer parserClass: SmalltalkParser.
+    inferencer process.
+
+    ^ self
+        completeAtLine:lineNr
+        column:colNr
+        collector:inferencer
+
+    "Created: / 02-10-2013 / 13:23:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 04-10-2013 / 09:31:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 completeAfter:node
     "return collection of completion items after given node"