'From Squeak5.3alpha of 25 May 2019 [latest update: #18600] on 28 May 2019 at 2:28:13 pm'!

!Object methodsFor: 'literals' stamp: 'mt 5/28/2019 10:58'!
hasLiteral: literal

	^ self hasLiteralSuchThat: [:lit | lit literalEqual: literal]!
]style[(11 1 7 3 1 1 4 1 19 3 3 1 1 1 3 1 13 1 7 1)b,cblack;,c000000126,cblack;,c126000000,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,cgray;,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;! !

!Object methodsFor: 'literals' stamp: 'mt 5/28/2019 12:19'!
hasLiteralSuchThat: testBlock

	self literalsDo: [:literal |
		(testBlock value: literal) ifTrue: [^ true]].
	
	^ false!
]style[(19 1 9 3 4 1 11 3 7 1 1 3 1 9 1 6 1 7 1 1 7 1 1 1 1 4 1 6 1 1 5)b,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,cgray;,cblack;,c000126000,c000000126,cblack;,c000000126,cblack;,c000000126,c000126000,cblack;,c000000126,cblack;,c000126000,c126000000,cblack;,c126000000,c000126000,cblack;,c126000000,cblack;,c126000000! !

!Object methodsFor: 'literals' stamp: 'mt 5/28/2019 12:37'!
hasLiteralThorough: literal
	"Backwards compatiblility."
	
	^ self hasLiteral: literal!
]style[(19 1 7 2 27 4 1 1 4 1 11 1 7)b,cblack;,c000000126,cblack;,c000126126,cblack;,c126000000,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126! !

!Object methodsFor: 'literals' stamp: 'mt 5/28/2019 12:18'!
literalsDo: aBlock

	aBlock value: self.!
]style[(11 1 6 3 6 1 6 1 4 1)b,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;! !


!AdditionalMethodState methodsFor: 'testing' stamp: 'mt 5/28/2019 14:16'!
literalsDo: aBlock

	1 to: self basicSize do: [:index |
		(self basicAt: index) literalsDo: aBlock].!
]style[(11 1 6 3 1 1 3 1 4 1 9 1 3 3 5 1 1 3 1 4 1 8 1 5 1 1 11 1 6 2)b,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,cgray;,cblack;,c000126000,c126000000,cblack;,c000000126,cblack;,c000000126,c000126000,cblack;,c000000126,cblack;,c000000126,cblack;! !


!Array methodsFor: 'literals' stamp: 'mt 5/28/2019 12:25'!
literalsDo: aBlock

	self do: [:each | each literalsDo: aBlock].!
]style[(11 1 6 3 4 1 3 3 4 1 1 1 4 1 11 1 6 2)b,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,cgray;,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;! !


!CompiledCode methodsFor: 'literals' stamp: 'mt 5/28/2019 14:27'!
allLiterals
	
	^ self literals!
]style[(11 4 1 1 4 1 8)b,cblack;,c126000000,cblack;,c126000000,cblack;,c000000126! !

!CompiledCode methodsFor: 'literals' stamp: 'mt 5/28/2019 14:08'!
literals
	
	^ Array streamContents: [:result |
		self literalsDo: [:lit | result nextPut: lit]]!
]style[(8 4 1 7 15 3 6 1 1 3 4 1 11 1 1 1 3 1 1 1 6 1 8 1 3 1 1)b,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,cgray;,cblack;,c126000000,cblack;,c000000126,cblack;,c000126000,cblack;,c000000126,cblack;,cgray;,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,c000126000,cblack;! !

!CompiledCode methodsFor: 'literals' stamp: 'mt 5/28/2019 14:15'!
literalsDo: aBlock
	"Evaluate aBlock for each of the literals referenced by the receiver."
	
	1 to: self numLiterals do: [:index |
		(self objectAt: index + 1) literalsDo: aBlock].!
]style[(11 1 6 2 70 4 1 1 3 1 4 1 11 1 3 3 5 1 1 3 1 4 1 9 1 5 1 1 1 1 1 1 11 1 6 2)b,cblack;,c000000126,cblack;,c000126126,cblack;,c126000000,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,cgray;,cblack;,c000126000,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,c000126000,cblack;,c000000126,cblack;,c000000126,cblack;! !


!CompiledBlock methodsFor: 'literals' stamp: 'mt 5/28/2019 14:16'!
literalsDo: aBlock

	"exclude outerCode"
	2 to: self numLiterals do: [:index | 
		(self objectAt: index) literalsDo: aBlock].!
]style[(11 1 6 3 19 2 1 1 3 1 4 1 11 1 3 3 5 1 1 4 1 4 1 9 1 5 1 1 11 1 6 2)b,cblack;,c000000126,cblack;,c000126126,cblack;,c126000000,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,cgray;,cblack;,c000126000,c126000000,cblack;,c000000126,cblack;,c000000126,c000126000,cblack;,c000000126,cblack;,c000000126,cblack;! !


!CompiledMethod methodsFor: 'literals' stamp: 'mt 5/28/2019 14:15'!
literalsDo: aBlock
	"Evaluate aBlock for each of the literals referenced by the receiver."
	
	self penultimateLiteral isMethodProperties
		ifTrue: [aBlock value: self penultimateLiteral].
	
	"exclude selector/properties & methodClass"
	2 to: self numLiterals - 1 do: [:index |
		(self objectAt: index) literalsDo: aBlock]!
]style[(11 1 6 2 70 4 4 1 18 1 18 3 7 2 6 1 6 1 4 1 18 6 43 2 1 1 3 1 4 1 11 1 1 1 1 1 3 3 5 1 1 3 1 4 1 9 1 5 1 1 11 1 6 1)b,cblack;,c000000126,cblack;,c000126126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000126126,cblack;,c126000000,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,cgray;,cblack;,c000126000,c126000000,cblack;,c000000126,cblack;,c000000126,c000126000,cblack;,c000000126,cblack;,c000000126,cblack;! !


!Association methodsFor: 'literals' stamp: 'mt 5/28/2019 12:24'!
literalsDo: aBlock
	"Try to look at my components first, then use the default implementation. This strategy origins from a former implementation of CompiledMethod >> #hasLiteralThorough: as well as AdditionalMethodState >> #hasLiteralSuchThat:."

	self key literalsDo: aBlock.
	self value literalsDo: aBlock.
	
	super literalsDo: aBlock.!
]style[(11 1 6 2 225 3 4 1 3 1 11 1 6 3 4 1 5 1 11 1 6 5 5 1 11 1 6 1)b,cblack;,c000000126,cblack;,c000126126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;! !


!ClassBinding methodsFor: 'literals' stamp: 'mt 5/28/2019 14:23'!
literalsDo: aBlock

	self key literalsDo: aBlock.
	self value literalsDo: aBlock.
	
	super literalsDo: aBlock.!
]style[(11 1 6 3 4 1 3 1 11 1 6 3 4 1 5 1 11 1 6 5 5 1 11 1 6 1)b,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;! !


!Global methodsFor: 'literals' stamp: 'mt 5/28/2019 14:24'!
literalsDo: aBlock

	self key literalsDo: aBlock.
	self value literalsDo: aBlock.
	
	super literalsDo: aBlock.!
]style[(11 1 6 3 4 1 3 1 11 1 6 3 4 1 5 1 11 1 6 5 5 1 11 1 6 1)b,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;! !


!Pragma methodsFor: 'literals' stamp: 'mt 5/28/2019 12:34'!
hasLiteral: aLiteral
	"Extra support for #hasLiteralTest:."
	
	^ (super hasLiteral: aLiteral)
		or: [keyword == #hasLiteralTest: and: [
			self methodClass theNonMetaClass perform: arguments first with: aLiteral]]!
]style[(11 1 8 2 37 4 1 2 5 1 11 1 8 4 3 10 2 1 16 1 4 1 1 4 4 1 11 1 15 1 8 11 5 1 5 1 8 1 1)b,cblack;,c000000126,cblack;,c000126126,cblack;,c126000000,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000126000,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,c000126000,cblack;! !

!Pragma methodsFor: 'literals' stamp: 'mt 5/28/2019 12:30'!
literalsDo: aBlock

	keyword literalsDo: aBlock.
	arguments literalsDo: aBlock.
	
	super literalsDo: aBlock.!
]style[(11 1 6 11 11 1 6 13 11 1 6 5 5 1 11 1 6 1)b,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c000000126,cblack;,c126000000,cblack;,c000000126,cblack;,c000000126,cblack;! !

Pragma removeSelector: #hasLiteralSuchThat:!

!Pragma reorganize!
('accessing-method' method methodClass selector)
('accessing-pragma' argumentAt: arguments key keyword message numArgs)
('initialization' setArguments: setKeyword: setMethod:)
('printing' printOn:)
('testing')
('comparing' = analogousCodeTo: hash)
('literals' hasLiteral: literalsDo:)
!


!Global reorganize!
('converting' asBinding:)
('initialize-release' initializeWithKey:value:)
('comparing')
('evaluating' value)
('accessing' value:)
('literals' literalEqual: literalsDo:)
!


!ClassBinding reorganize!
('converting' asBinding:)
('accessing' canAssign value:)
('initialize-release' initializeWithKey:value:)
('testing' isSpecialWriteBinding)
('comparing')
('evaluating' value)
('literals' literalEqual: literalsDo:)
!


!Binding reorganize!
('comparing' analogousCodeTo:)
('accessing' canAssign source)
('testing' isSpecialReadBinding isSpecialWriteBinding)
('objects from disk' objectForDataStream:)
('printing' printOn:)
!

Association removeSelector: #hasLiteral:!

!Association reorganize!
('accessing' key:value: value value:)
('comparing' = analogousCodeTo: hash)
('filter streaming' byteEncode:)
('printing' printOn: storeOn:)
('testing' isSpecialWriteBinding)
('*services-base-preferences' serviceUpdate)
('*environments' asBinding:)
('*JSON-writing' jsonWriteOn:)
('*vivide' acceptObjectService: asScript storeCompactOn:)
('*ston-core' stonOn:)
('literals' literalEqual: literalsDo:)
!


!LookupKey reorganize!
('accessing' canAssign key key: name)
('bindings' beBindingOfType:announcing: beReadOnlyBinding beReadOnlyBindingAnnouncing: beReadWriteBinding beReadWriteBindingAnnouncing: recompileBindingsAnnouncing:)
('comparing' < = hash)
('filter streaming' writeOnFilterStream:)
('printing' printOn:)
('testing' isSpecialReadBinding isVariableBinding)
('*Etoys-Squeakland-comparing' hashMappedBy:)
!

CompiledMethod removeSelector: #allLiterals!
CompiledMethod removeSelector: #hasLiteral:!
CompiledMethod removeSelector: #hasLiteralSuchThat:!
CompiledMethod removeSelector: #hasLiteralThorough:!
CompiledBlock removeSelector: #allSubLiterals!
CompiledBlock removeSelector: #hasLiteral:!
CompiledBlock removeSelector: #hasLiteralSuchThat:!
Array removeSelector: #hasLiteral:!
Array removeSelector: #hasLiteralSuchThat:!

!Array reorganize!
('accessing' atWrap: atWrap:put:)
('arithmetic' +* preMultiplyByArray: preMultiplyByMatrix:)
('comparing')
('converting' asArray elementsExchangeIdentityWith: elementsForwardIdentityTo: elementsForwardIdentityTo:copyHash: evalStrings)
('copying' copyWithDependent:)
('filter streaming' byteEncode:)
('printing' printAsBraceFormOn: printAsLiteralOn: printOn: storeOn:)
('self evaluating')
('testing' isArray isLiteral isLiteralIfContainedBy: shouldBePrintedAsLiteral shouldBePrintedAsLiteralVisiting:)
('private' replaceFrom:to:with:startingAt:)
('sorting' sorted:)
('*System-Object Storage-file in/out' objectForDataStream:)
('*monticellofiletree-core' writeCypressJsonOn:forHtml:indent:)
('*vivide' storeCompactOn:)
('*Etoys-Squeakland-comparing' hashMappedBy:)
('*Etoys-Squeakland-translating' literalStringsDo:)
('literals' literalEqual: literalsDo:)
!

AdditionalMethodState removeSelector: #hasLiteralSuchThat:!
AdditionalMethodState removeSelector: #hasLiteralThorough:!
Object removeSelector: #hasLiteraThoroughl:!

!Object reorganize!
('accessing' at: at:modify: at:put: basicAt: basicAt:put: basicSize bindWithTemp: enclosedSetElement ifNil:ifNotNilDo: ifNotNilDo: ifNotNilDo:ifNil: in: presenter readFromString: size yourself)
('associating' ->)
('binding' bindingOf:)
('casing' caseOf: caseOf:otherwise:)
('class membership' class inheritsFromAnyIn: isKindOf: isKindOf:orOf: isMemberOf: respondsTo: xxxClass)
('comparing' closeTo: hash identityHashPrintString literalEqual: = ~=)
('converting' adaptToFloat:andCompare: adaptToFloat:andSend: adaptToFraction:andCompare: adaptToFraction:andSend: adaptToInteger:andCompare: adaptToInteger:andSend: adaptToScaledDecimal:andCompare: asOrderedCollection asSetElement asString asStringOrText as: changeClassTo: complexContents mustBeBoolean mustBeBooleanIn: printDirectlyToDisplay withoutListWrapper)
('copying' copy copyAddedStateFrom: copyFrom: copySameFrom: copyTwoLevel deepCopy initialDeepCopierSize postCopy shallowCopy veryDeepCopy veryDeepCopySibling veryDeepCopyUsing: veryDeepCopyWith: veryDeepFixupWith: veryDeepInner:)
('debugging' haltIf: needsWork)
('debugging-haltOnce' checkHaltCountExpired clearHaltOnce decrementAndCheckHaltCount decrementHaltCount doExpiredHaltCount doExpiredHaltCount: doExpiredInspectCount haltOnCount: haltOnce haltOnceEnabled haltOnce: halt:onCount: hasHaltCount inspectOnCount: inspectOnce inspectUntilCount: removeHaltCount setHaltCountTo: setHaltOnce toggleHaltOnce)
('dependents access' addDependent: breakDependents canDiscardEdits dependents evaluate:wheneverChangeIn: hasUnacceptedEdits myDependents myDependents: release removeDependent:)
('drag and drop' acceptDroppingMorph:event:inMorph: dragPassengerFor:inMorph: dragStartedFor:transferMorph: dragTransferTypeForMorph: wantsDroppedMorph:event:inMorph:)
('error handling' assert: assert:descriptionBlock: assert:description: backwardCompatibilityOnly: caseError deprecated deprecated: deprecated:block: doesNotUnderstand: dpsTrace: dpsTrace:levels: dpsTrace:levels:withContext: error error: halt halt: handles: notify: notify:at: primitiveFailed primitiveFailed: shouldBeImplemented shouldNotImplement subclassResponsibility traitConflict)
('evaluating' value valueWithArguments:)
('filter streaming' byteEncode: drawOnCanvas: elementSeparator encodePostscriptOn: flattenOnStream: fullDrawPostscriptOn: putOn: writeOnFilterStream:)
('flagging' isThisEverCalled isThisEverCalled: logEntry logExecution logExit)
('graph model' addModelYellowButtonMenuItemsTo:forMorph:hand: hasModelYellowButtonMenuItems)
('macpal' codeStrippedOut: contentsChanged flash instanceVariableValues isUniversalTiles objectRepresented refusesToAcceptCode scriptPerformer slotInfo)
('message handling' executeMethod: perform: perform:orSendTo: perform:with:with:with:with: perform:withArguments: perform:withArguments:inSuperclass: perform:withEnoughArguments: perform:with: perform:with:with: perform:with:with:with: withArgs:executeMethod: with:executeMethod: with:with:executeMethod: with:with:with:executeMethod: with:with:with:with:executeMethod:)
('objects from disk' comeFullyUpOnReload: convertToCurrentVersion:refStream: fixUponLoad:seg: objectForDataStream: readDataFrom:size: saveOnFile saveOnFileNamed: storeDataOn:)
('printing' fullPrintString isLiteral longPrintOn: longPrintOn:limitedTo:indent: longPrintString longPrintStringLimitedTo: nominallyUnsent: printOn: printString printStringLimitedTo: printWithClosureAnalysisOn: reportableSize storeOn: storeString stringForReadout stringRepresentation)
('scripting' adaptedToWorld: defaultFloatPrecisionFor: evaluateUnloggedForSelf: methodInterfacesForCategory:inVocabulary:limitClass: methodInterfacesForInstanceVariablesCategoryIn: methodInterfacesForScriptsCategoryIn: selfWrittenAsIll selfWrittenAsIm selfWrittenAsMe selfWrittenAsMy selfWrittenAsThis)
('system primitives' asOop className creationStamp instVarAt: instVarAt:put: instVarNamed: instVarNamed:put: oopString primitiveChangeClassTo: rootStubInImageSegment: someObject)
('testing' beViewed belongsToUniClass costumes haltIfNil isArray isBehavior isBlock isBoolean isCharacter isClassReference isClosure isCodeReference isCollection isColor isColorForm isCompiledCode isCompiledMethod isComplex isContext isDictionary isFloat isForm isFraction isHeap isInteger isInterval isMessageSend isMethodContext isMethodProperties isMethodReference isMorph isMorphicEvent isMorphicModel isNumber isPlayer isPoint isPrimitiveCostume isPromise isRectangle isScriptEditorMorph isSketchMorph isStream isString isSymbol isSystemWindow isText isTextView isTrait isTransparent isVariableBinding isWebBrowser isWindowForModel: knownName name nameForViewer renameInternal: renameTo: shouldBePrintedAsLiteral shouldBePrintedAsLiteralVisiting: showDiffs stepAt:in: stepIn: stepTime stepTimeIn: vocabularyDemanded wantsDiffFeedback wantsSteps wantsStepsIn:)
('updating' changed changed: changed:with: handledListVerification noteSelectionIndex:for: okToChange okToClose updateListsAndCodeIn: update: update:with: windowIsClosing)
('user interface' addModelItemsToWindowMenu: addModelMenuItemsTo:forMorph:hand: asExplorerString defaultLabelForInspector launchPartVia: launchPartVia:label: launchTileToRefer modelSleep modelWakeUp modelWakeUpIn: mouseUpBalk: notYetImplemented windowActiveOnFirstClick windowReqNewLabel:)
('*monticello' isConflict)
('*services-base' requestor)
('*system-support' isPrimitiveError systemNavigation)
('*Tools-Explorer' explore exploreWithLabel:)
('*tools-browser' browseHierarchy)
('private' errorImproperStore errorNonIntegerIndex errorNotIndexable errorSubscriptBounds: setPinned: species storeAt:inTempFrame:)
('thumbnail' iconOrThumbnailOfSize:)
('*Morphic-Explorer' explorerContents hasContentsInExplorer)
('futures' future future: futureDo:at:args: futureSend:at:args:)
('*Etoys-viewer' assureUniClass browseOwnClassSubProtocol categoriesForViewer: categoriesForVocabulary:limitClass: chooseNewNameForReference defaultLimitClassForVocabulary: defaultNameStemForInstances elementTypeFor:vocabulary: externalName graphicForViewerTab hasUserDefinedSlots infoFor:inViewer: initialTypeForSlotNamed: isPlayerLike methodInterfacesInPresentationOrderFrom:forCategory: newScriptorAround: newTileMorphRepresentative offerViewerMenuFor:event: offerViewerMenuForEvt:morph: renameScript: tilePhrasesForCategory:inViewer: tilePhrasesForMethodInterfaces:inViewer: tilePhrasesForSelectorList:inViewer: tileToRefer uniqueInstanceVariableNameLike:excluding: uniqueNameForReference uniqueNameForReferenceFrom: uniqueNameForReferenceOrNil updateThresholdForGraphicInViewerTab usableMethodInterfacesIn:)
('*Protocols' currentVocabulary haveFullProtocolBrowsed haveFullProtocolBrowsedShowingSelector:)
('*Etoys-tiles' basicType)
('*Tools-MessageSets' browseAllCallsOn: browseAllImplementorsOf:)
('*Tools-multi-window support' canHaveUnacceptedEdits)
('*morphic' asDraggableMorph asMorph asStringMorph asTextMorph isPluggableListMorph openAsMorph)
('*MorphicExtras-Undo' capturedState commandHistory purgeAllCommands redoFromCapturedState: refineRedoTarget:selector:arguments:in: refineUndoTarget:selector:arguments:in: rememberCommand: rememberUndoableAction:named: undoFromCapturedState:)
('*MorphicExtras-PartsBin' descriptionForPartsBin)
('tracing' inboundPointers inboundPointersExcluding: outboundPointers outboundPointersDo:)
('*Tools-Debugger' canonicalArgumentName chasePointers explorePointers shouldFollowOutboundPointers)
('*System-Object Events-accessing' actionForEvent: actionForEvent:ifAbsent: actionMap actionSequenceForEvent: actionsDo: createActionMap hasActionForEvent: setActionSequence:forEvent: updateableActionMap)
('*System-Change Notification-events' actionsWithReceiver:forEvent: renameActionsWithReceiver:forEvent:toEvent:)
('*System-Change Notification-converting' asActionSequence asActionSequenceTrappingErrors)
('*System-Tools-breakpoint' break)
('*ToolBuilder-Kernel-error handling' confirm: confirm:orCancel:)
('*EToys-user interface' eToyStreamedRepresentationNotifying:)
('*ToolBuilder-Kernel-user interface' inform:)
('*System-Support-user interface' initialExtent)
('*System-Localization-locales' localeChanged localeChangedGently translatedNoop)
('*System-Object Events-accessing-removing' releaseActionMap removeAction:forEvent: removeActionsForEvent: removeActionsSatisfying: removeActionsSatisfying:forEvent: removeActionsWithReceiver: removeActionsWithReceiver:forEvent:)
('*System-Object Events-accessing-triggering' triggerEvent: triggerEvent:ifNotHandled: triggerEvent:with: triggerEvent:with:ifNotHandled: triggerEvent:withArguments: triggerEvent:withArguments:ifNotHandled:)
('*System-Object Events-accessing-registering' when:evaluate: when:send:to: when:send:to:with: when:send:to:withArguments:)
('*Tools-inspecting' basicInspect inspect inspectWithLabel: inspectorClass)
('*Traits' explicitRequirement requirement)
('*Graphics-KernelExtensions' fullScreenSize)
('*System-Finalization' actAsExecutor executor finalizationRegistry finalize hasMultipleExecutors retryWithGC:until: toFinalizeSend:to:with:)
('*collections' asLink compareSafely:)
('*Tools-Browsing' browse)
('*System-Recovery-error handling' primitiveError:)
('*animations-support' compositeAnimations)
('*Tools-error handling' notifyWithLabel:)
('*SUnit-testing' isTestClass)
('*51Deprecated' defaultBackgroundColor dragAnimationFor:transferMorph:)
('*Morphic-Events-Filtering' filterEvent:for:)
('*System-Preferences' applyUserInterfaceTheme canApplyUserInterfaceTheme userInterfaceTheme)
('*metacello-core' metacelloIntegerLessThanSelf: metacelloSemanticIntegerLessThanSelf: metacelloSemanticStringLessThanSelf: metacelloSemanticVersionComponentLessThan: metacelloStringLessThanSelf: metacelloVersionComponentLessThan:)
('*monticellofiletree-core' writeCypressJsonForHtmlOn:indent: writeCypressJsonOn:forHtml:indent: writeCypressJsonOn:indent:)
('*signals-core' connect:signal:to:selector: connect:signal:to:selector:pattern: connect:signal:to:selector:pattern:queue: connect:signal:to:selector:pattern:queue:blocking: connect:signal:to:selector:queue: connect:signal:to:selector:queue:blocking: connect:signal:toSelector: connect:signal:toSelector:pattern: connect:signal:toSelector:pattern:queue: connect:signal:toSelector:pattern:queue:blocking: connect:signal:toSelector:queue: connect:signal:toSelector:queue:blocking: createAutoSignalConnections disconnectAllSignals disconnectSignal: disconnectSignal:from: disconnectSignal:from:selector: emit emitAlways)
('*signals-core-private' connectSignal:to:selector:pattern:queue:blocking: emitSignal:arguments:sender: hasSignalConnections signalConnections signalConnectionsRepository signalMutex)
('*widgets-events' isEventHandler)
('*widgettools-scripts' breakhere: breaktime:)
('*JSON' asJsonString)
('*vivide' <- acceptObjectService: asList asScript classBehindProxy compactStoreString drag hasVivideTools isList isScript isScriptDefinition open retain storeCompactOn:)
('*MethodWrappers' isMwMethodWrapper synchronize unsynchronize)
('*Etoys-Squeakland-accessing' customizeExplorerContents)
('*Etoys-Squeakland-comparing' eToysEQ: eToysGE: eToysGT: eToysLE: eToysLT: eToysNE:)
('*Etoys-Squeakland-error handling' eToysError:)
('*Etoys-Squeakland-Etoys-viewer' hasUserDefinedScripts)
('*Etoys-Squeakland-translation support' inline:)
('*Etoys-Squeakland-testing' isReallyString)
('*Etoys-Squeakland-user interface' launchPartOffsetVia:label:)
('*Etoys-Squeakland-translating' literalStringsDo:)
('*Etoys-Squeakland-Tweak-Kedama' test:ifTrue:ifFalse: times:repeat:)
('*Tools' environment)
('*60Deprecated-copying' clone)
('pinning' isPinned pin unpin)
('*Morphic-Kernel' currentEvent currentHand currentWorld)
('*EToys-Scripting-accessing' addInstanceVarNamed:withValue: basicAddInstanceVarNamed:withValue:)
('*60Deprecated-Tools' exploreAndYourself)
('*ston-core' fromSton: isStonReference stonContainSubObjects stonOn: stonPostReferenceResolution stonProcessSubObjects: stonShouldWriteNilInstVars)
('*Squot' browseFromSquot: hasSquotShadowName squotDecoratedLike: undecorated)
('*Squot-trackable' captureWithSquot squotAddTransientStoreInfoTo: squotInitializeStoreInfo: squotRemoveTransientStoreInfoFrom:)
('*Squot-trackable-capturing' captureWithSquot: shouldHaveNameAssignedBySquot squotCaptureSlotsIn:with: squotReactivateWith: squotRelevantInstVars squotReplacementFor: squotShadowFactory squotShouldKeepIdentity)
('*Squot-serializing' squotWrite:with:)
('*Squit' squitBrowserSupplementObjectMenu:)
('literals' hasLiteral: hasLiteralSuchThat: hasLiteralThorough: literalsDo:)
!

