--- a/SmallSense__SmalltalkCompletionEngine.st Wed Jan 22 12:52:34 2014 +0000
+++ b/SmallSense__SmalltalkCompletionEngine.st Wed Jan 22 21:54:51 2014 +0000
@@ -33,11 +33,12 @@
debug: aBoolean
Debug := aBoolean .
"
- seld debug: true.
- seld debug: false.
+ self debug: true.
+ self debug: false.
"
"Created: / 22-01-2014 / 09:08:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified (comment): / 22-01-2014 / 19:42:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!SmalltalkCompletionEngine class methodsFor:'utilities'!
@@ -172,6 +173,11 @@
| classes seen |
classes := type classes.
+ "/ Hack for Boolean: ifTrue:iFalse: etc are not defined
+ "/ in Boolean ?!!?
+ (classes size == 1 and:[classes anElement == Boolean ]) ifTrue:[
+ classes := Array with: True with: False.
+ ].
classes size == 1 ifTrue:[
classes anElement == JavaPackage class ifTrue:[
"/ Special hack for JAVA: for pattern `JAVA java lang reflect`
@@ -196,7 +202,7 @@
].
seen := Set new.
- type classesDo: [:each |
+ classes do: [:each |
| class |
class := each.
@@ -225,7 +231,7 @@
].
"Created: / 26-11-2011 / 17:03:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 22-10-2013 / 12:13:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 22-01-2014 / 19:48:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
addPools
@@ -297,6 +303,11 @@
collector parser methodVars ? #() do:[:nm|
result add: (VariablePO variable: nm).
].
+ "Add literals"
+ #(#true #false #nil ) do:[:nm|
+ result add: (SnippetPO new subject: nm).
+ ].
+
n := node.
[ n notNil ] whileTrue:[
@@ -308,7 +319,7 @@
]
"Created: / 31-07-2013 / 00:32:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 22-01-2014 / 09:21:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 22-01-2014 / 19:42:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!SmalltalkCompletionEngine methodsFor:'completion-private'!