Skip to content
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
type guessing
guessTypeWith: anECContext
^ anECContext guessClassVarClass: contents
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
label
^ 'class variable'
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
public
methodRefs
| theClass classVarAssoc |
theClass := receiverClass classThatDefinesClassVariable: variableName.
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
bytecode decoding
popIntoLiteralVariable: anAssociation
anAssociation key == variableName asSymbol
ifTrue: [ found := true ]
Expand Down
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
instruction decoding
popIntoReceiverVariable: offset
self reset
Original file line number Diff line number Diff line change
@@ -1,2 +1,2 @@
as yet unclassified
bytecode decoding
send: selector super: supered numArgs: numberArguments
Original file line number Diff line number Diff line change
Expand Up @@ -11,6 +11,7 @@ guessTypeOf: aNumber
^theClass ifNotNil: [
(theClass isKindOf: Class) ifTrue: [ "It may be a Trait or something else."
theClass superclass ] ] ].
range isThisContext ifTrue: [ ^Context ].
range asType ifNotNil: [ :type | "Constant"
type == Number ifFalse: [ ^type ].
^(SqNumberParser
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -29,7 +29,7 @@
"guessNewInstanceClass:" : "LM 11/1/2018 21:34",
"guessTempVarClass:" : "bar 3/1/2006 13:52",
"guessTempVarClass:type:" : "LM 3/14/2019 17:39",
"guessTypeOf:" : "LM 11/1/2021 20:54",
"guessTypeOf:" : "ct 12/20/2023 14:53",
"guessUnary:" : "LM 11/15/2018 16:02",
"guessUnaryAccessorClass:" : "LM 11/1/2018 21:31",
"handleBlockStack:with:" : "lr 7/4/2009 10:42",
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
accessing
fontColor

^ ECPreferences menuFontColor
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
height
^ ECMenuMorph itemHeight * 15.5
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
width
^ ECMenuMorph itemWidth * 2.0
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
comparing
<= anECEntry

^ self lastUse = anECEntry lastUse
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
actions
browseWith: anECContext
type := self guessTypeWith: anECContext.
type
Expand Down
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
completion
^ self contentsAsSymbol separateKeywords
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
contents
^contents
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
contentsAsSymbol
^ self contents asSymbol
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
detail information
descriptionWith: anECContext
description ifNotNil: [ ^ description ].
^ description := self createDescriptionWith: anECContext
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
type guessing
guessTypeWith: anECContext
^ nil
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
testing
isInstance
^ false
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
testing
isLocal
^ false
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
testing
isSelector
^ false
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
label
^ 'unknown'
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
printing
printOn: aStream
aStream nextPutAll: self class name;
nextPut: $(;
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
initialize-release
setContents: aString type: aSymbol
contents := aString.
type := aSymbol
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
type
^type
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
instance creation
label: firstString
^ self new
setLabel: firstString
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
instance creation
label: firstString title: secondString description: thirdString
^ self new
setLabel: firstString
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
instance creation
newFrom: anException

^ self new
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
actions
browseWith: anECContext

"For inspiration, see StandardToolSet class>>#debugException:"
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
detail information
createDescriptionWith: anECContext

^ ECEntryDescription
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
accessing
label

^ 'Exception: ', self exception description
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
testing
matchNarrowString: aString

"Return a really high match priority here.
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
drawing
selectColor

^ Color red darker
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
type guessing
guessTypeWith: anECContext
| globalEntry |
globalEntry := Smalltalk at: contents ifAbsent: [^ nil].
Expand Down
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
label
^ 'global'
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
type guessing
guessTypeWith: anECContext
^ anECContext guessInstVarClass: contents
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
testing
isInstance
^true
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
label
^ 'instance variable'
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
public
methodRefs
| theClass selectors |
theClass := receiverClass classThatDefinesInstanceVariable: variableName.
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
bytecode decoding
prepare: aCompiledMethod
| theClass |
super prepare: aCompiledMethod.
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
type guessing
guessTypeWith: anECContext
^ (anECContext guessTempVarClass: contents type: type)
ifNil: [anECContext guessArgument: contents]
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
testing
isLocal
^true
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
label
^ 'local variable'
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
accessing
selectorsAsSymbols

^ selectors collect: [:each | each contentsAsSymbol]
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
accessing
completion

| seperated firstSmartTab |
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
detail information
createDescriptionWith: anECContext
^ self
findMethodWith: anECContext
Expand Down
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
label
^ 'method'
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
detail information
methodSourceDescription: aClass method: aCompiledMethod
| styler |
styler := SHTextStylerST80 new.
Expand Down
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
type guessing
guessTypeWith: anECContext
^ anECContext theClass
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
label
^ 'self'
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
type guessing
guessTypeWith: anECContext
^ anECContext theClass ifNotNil: [anECContext theClass superclass]
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
accessing
label
^ 'super'
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
accessing
contains: aString caseSensitive: aBoolean do: aBlock

self contains: aString caseSensitive: aBoolean exclude: {} do: aBlock
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
accessing
contains: aString caseSensitive: aBoolean exclude: aCollection do: aBlock

| separators |
Expand Down
Empty file.
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
type guessing
guessTypeWith: anECContext
^ Context
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
accessing
label
^ 'thisContext'
Original file line number Diff line number Diff line change
@@ -0,0 +1,6 @@
{
"class" : {
},
"instance" : {
"guessTypeWith:" : "ct 12/20/2023 14:42",
"label" : "ct 12/20/2023 14:42" } }
Original file line number Diff line number Diff line change
@@ -0,0 +1,14 @@
{
"category" : "Autocompletion-ECModel",
"classinstvars" : [
],
"classvars" : [
],
"commentStamp" : "",
"instvars" : [
],
"name" : "ECThisContextEntry",
"pools" : [
],
"super" : "ECEntry",
"type" : "normal" }
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
instance creation
definedByLiteral: aClass
| newInstance |
newInstance := self new.
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
instance creation
definedByMessageSend: aClass
| newInstance |
newInstance := self new.
Expand Down
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
as yet unclassified
instance creation
definedByTemporaryVar: anInteger
| newInstance |
newInstance := self new.
Expand Down
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
testing
isDefinedByMessageSend
^kind == 2
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
as yet unclassified
testing
isDefinedByTemporary
^ kind == 3
Loading