Navigation Menu

Skip to content

Instantly share code, notes, and snippets.

@seandenigris
Last active May 19, 2018 13:24
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save seandenigris/d153ff4757f681c5169a29cf832ca31a to your computer and use it in GitHub Desktop.
Save seandenigris/d153ff4757f681c5169a29cf832ca31a to your computer and use it in GitHub Desktop.
Pharo 7 Debug Log - Freetype Problem?
THERE_BE_DRAGONS_HERE
Could not find accessor for variable named "'dest'"
19 May 2018 9:12:21.051871 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'dest'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: LibC
methodArgs: #(#arg1 #arg2 #arg3)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'dest'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: LibC
methodArgs: #(#arg1 #arg2 #arg3)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'dest'
arg2: nil
arg3: 'void'
arg4: 1
tmp1: a FFIVoid*
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: LibC
methodArgs: #(#arg1 #arg2 #arg3)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'dest'
tmp3: nil
tmp4: #('void' 1)
tmp5: $,
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#void #* #memcpy #(#void #* #dest #, #const #void #* #src #, #size_t #n...etc...
tmp1: {$v. $o. $i. $d. Character space. $*. Character space. $d. $e. $s. $t. Ch...etc...
tmp2: {$v. $o. $i. $d. Character space. $*. Character space. $m. $e. $m. $c. $p...etc...
tmp3: 'memcpy'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: LibC>>memCopy:to:size:
signature: #(#void #* #memcpy #(#void #* #dest #, #const #void #* #src #, #size...etc...
module: 'libc.dylib'
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: LibC>>memCopy:to:size:
signature: #(#void #* #memcpy #(#void #* #dest #, #const #void #* #src #, #size...etc...
module: 'libc.dylib'
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: LibC>>memCopy:to:size:
signature: #(#void #* #memcpy #(#void #* #dest #, #const #void #* #src #, #size...etc...
module: 'libc.dylib'
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: LibC>>memCopy:to:size:
options: #()
callingConvention: #cdecl
LibC(Object)>>ffiCall:
Receiver: a LibC
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
a LibC
LibC>>memCopy:to:size:
Receiver: a LibC
Arguments and temporary variables:
arg1: #[116 116 99 102 0 2 0 0 0 0 0 4 0 0 0 40 0 0 1 148 0 0 3 0 0 0 4 156 0 0...etc...
arg2: @ 16r0AF0E000
arg3: 3200180
Receiver's instance variables:
a LibC
LibC class>>memCopy:to:size:
Receiver: LibC
Arguments and temporary variables:
arg1: #[116 116 99 102 0 2 0 0 0 0 0 4 0 0 0 40 0 0 1 148 0 0 3 0 0 0 4 156 0 0...etc...
arg2: @ 16r0AF0E000
arg3: 3200180
Receiver's instance variables:
superclass: FFILibrary
methodDict: a MethodDictionary(#currentProcessId->LibC>>#currentProcessId #fget...etc...
format: 0
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #LibC
classPool: a Dictionary()
sharedPools: an OrderedCollection()
environment: a SystemDictionary(lots of globals)
category: #'UnifiedFFI-Libraries'
uniqueInstance: a LibC
FreeTypeExternalMemory>>primCopyToExternalMemory:
Receiver: a FreeTypeExternalMemory(@ 16r0AF0E000)<0xAF0E000>
Arguments and temporary variables:
arg1: #[116 116 99 102 0 2 0 0 0 0 0 4 0 0 0 40 0 0 1 148 0 0 3 0 0 0 4 156 0 0...etc...
Receiver's instance variables:
handle: @ 16r0AF0E000
bytes: #[116 116 99 102 0 2 0 0 0 0 0 4 0 0 0 40 0 0 1 148 0 0 3 0 0 0 4 156 0 ...etc...
FreeTypeExternalMemory>>validate
Receiver: a FreeTypeExternalMemory(@ 16r0AF0E000)<0xAF0E000>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r0AF0E000
bytes: #[116 116 99 102 0 2 0 0 0 0 0 4 0 0 0 40 0 0 1 148 0 0 3 0 0 0 4 156 0 ...etc...
EmbeddedFreeTypeFontInstaller>>addFromFileContents:baseName:
Receiver: an EmbeddedFreeTypeFontInstaller
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
embeddedFileInfoCache: a Dictionary(#(3200180 0)->a Set() )
provider: a FreeTypeFontProvider
LucidaGrandeRegular class(EmbeddedFreeTypeFontFontDescription class)>>installFontsIn:
Receiver: LucidaGrandeRegular
Arguments and temporary variables:
arg1: an EmbeddedFreeTypeFontInstaller
Receiver's instance variables:
superclass: EmbeddedFreeTypeFontFontDescription
methodDict: a MethodDictionary()
format: 0
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #LucidaGrandeRegular
classPool: a Dictionary()
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #EmbeddedFreeType
[ :arg2 | arg2 installFontsIn: arg1 ] in EmbeddedFreeTypeFontFontDescription class>>installAllFontsIn:
Receiver: EmbeddedFreeTypeFontFontDescription
Arguments and temporary variables:
arg1: an EmbeddedFreeTypeFontInstaller
arg2: LucidaGrandeRegular
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary()
format: 0
layout: a FixedLayout
organization: a ClassOrganization
subclasses: {LucidaGrandeRegular. SourceCodeProRegular. SourceSansProRegular}
name: #EmbeddedFreeTypeFontFontDescription
classPool: a Dictionary()
sharedPools: an OrderedCollection()
environment: a SystemDictionary(lots of globals)
category: #EmbeddedFreeType
OrderedCollection>>do:
Receiver: an OrderedCollection(LucidaGrandeRegular SourceCodeProRegular SourceSansProRegular)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: {LucidaGrandeRegular. SourceCodeProRegular. SourceSansProRegular}
firstIndex: 1
lastIndex: 3
EmbeddedFreeTypeFontFontDescription class>>installAllFontsIn:
Receiver: EmbeddedFreeTypeFontFontDescription
Arguments and temporary variables:
arg1: an EmbeddedFreeTypeFontInstaller
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary()
format: 0
layout: a FixedLayout
organization: a ClassOrganization
subclasses: {LucidaGrandeRegular. SourceCodeProRegular. SourceSansProRegular}
name: #EmbeddedFreeTypeFontFontDescription
classPool: a Dictionary()
sharedPools: an OrderedCollection()
environment: a SystemDictionary(lots of globals)
category: #EmbeddedFreeType
EmbeddedFreeTypeFontInstaller>>installAllFontsIn:
Receiver: an EmbeddedFreeTypeFontInstaller
Arguments and temporary variables:
arg1: a FreeTypeFontProvider
Receiver's instance variables:
embeddedFileInfoCache: a Dictionary(#(3200180 0)->a Set() )
provider: a FreeTypeFontProvider
[ :arg1 | arg1 installAllFontsIn: self ] in FreeTypeFontProvider>>updateEmbeddedFreeTypeFonts
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: an EmbeddedFreeTypeFontInstaller
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
OrderedCollection>>do:
Receiver: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(an EmbeddedFreeTypeFontInstaller nil nil nil nil nil nil nil ni...etc...
firstIndex: 1
lastIndex: 1
FreeTypeFontProvider>>updateEmbeddedFreeTypeFonts
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
FreeTypeSettings class>>updateFreeType
Receiver: FreeTypeSettings
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#bitBltSubPixelAvailable->FreeTypeSettings>>#bit...etc...
format: 65549
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #FreeTypeSettings
classPool: a Dictionary(#UpdateFontsAtImageStartup->false )
sharedPools: an OrderedCollection(FT2Constants FreeTypeCacheConstants)
environment: a SystemDictionary(lots of globals)
category: #'FreeType-Settings'
current: a FreeTypeSettings
FreeTypeSettings class>>startUp:
Receiver: FreeTypeSettings
Arguments and temporary variables:
arg1: true
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#bitBltSubPixelAvailable->FreeTypeSettings>>#bit...etc...
format: 65549
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #FreeTypeSettings
classPool: a Dictionary(#UpdateFontsAtImageStartup->false )
sharedPools: an OrderedCollection(FT2Constants FreeTypeCacheConstants)
environment: a SystemDictionary(lots of globals)
category: #'FreeType-Settings'
current: a FreeTypeSettings
ClassSessionHandler>>startup:
Receiver: a ClassSessionHandler(FreeTypeSettings)
Arguments and temporary variables:
arg1: true
Receiver's instance variables:
registeredClassName: #FreeTypeSettings
[ :arg2 | arg2 startup: arg1 ] in WorkingSession>>runStartup:
Receiver: a WorkingSession
Arguments and temporary variables:
arg1: true
arg2: a ClassSessionHandler(FreeTypeSettings)
Receiver's instance variables:
manager: a SessionManager
deferredStartupActions: an OrderedCollection([ self new activate ] [ UIManager ...etc...
id: nil
creationTime: 2018-05-19T09:12:20.789686-04:00
[ arg2 value: arg3 ] in [ :arg3 |
[ arg2 value: arg3 ]
on: Exception
do: [ :arg4 | self errorHandler handleError: arg4 ] ] in WorkingSession>>runList:do:
Receiver: a WorkingSession
Arguments and temporary variables:
arg1: an Array(a ClassSessionHandler(GlobalIdentifier) a ClassSessionHandler(Sm...etc...
arg2: [ :arg2 | arg2 startup: arg1 ]
arg3: a ClassSessionHandler(FreeTypeSettings)
Receiver's instance variables:
manager: a SessionManager
deferredStartupActions: an OrderedCollection([ self new activate ] [ UIManager ...etc...
id: nil
creationTime: 2018-05-19T09:12:20.789686-04:00
BlockClosure>>on:do:
Receiver: [ arg2 value: arg3 ]
Arguments and temporary variables:
arg1: Exception
arg2: [ :arg4 | self errorHandler handleError: arg4 ]
Receiver's instance variables:
outerContext: [ :arg3 |
[ arg2 value: arg3 ]
on: Exception
do: [ :arg4 | sel...etc...
startpc: 41
numArgs: 0
[ :arg3 |
[ arg2 value: arg3 ]
on: Exception
do: [ :arg4 | self errorHandler handleError: arg4 ] ] in WorkingSession>>runList:do:
Receiver: a WorkingSession
Arguments and temporary variables:
arg1: an Array(a ClassSessionHandler(GlobalIdentifier) a ClassSessionHandler(Sm...etc...
arg2: [ :arg2 | arg2 startup: arg1 ]
arg3: a ClassSessionHandler(FreeTypeSettings)
Receiver's instance variables:
manager: a SessionManager
deferredStartupActions: an OrderedCollection([ self new activate ] [ UIManager ...etc...
id: nil
creationTime: 2018-05-19T09:12:20.789686-04:00
Array(SequenceableCollection)>>do:
Receiver: an Array(a ClassSessionHandler(GlobalIdentifier) a ClassSessionHandler(SmallInteger) a Cla...etc...
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
an Array(a ClassSessionHandler(GlobalIdentifier) a ClassSessionHandler(SmallInteger) a Cla...etc...
WorkingSession>>runList:do:
Receiver: a WorkingSession
Arguments and temporary variables:
arg1: an Array(a ClassSessionHandler(GlobalIdentifier) a ClassSessionHandler(Sm...etc...
arg2: [ :arg2 | arg2 startup: arg1 ]
Receiver's instance variables:
manager: a SessionManager
deferredStartupActions: an OrderedCollection([ self new activate ] [ UIManager ...etc...
id: nil
creationTime: 2018-05-19T09:12:20.789686-04:00
WorkingSession>>runStartup:
Receiver: a WorkingSession
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
manager: a SessionManager
deferredStartupActions: an OrderedCollection([ self new activate ] [ UIManager ...etc...
id: nil
creationTime: 2018-05-19T09:12:20.789686-04:00
WorkingSession>>start:
Receiver: a WorkingSession
Arguments and temporary variables:
arg1: true
Receiver's instance variables:
manager: a SessionManager
deferredStartupActions: an OrderedCollection([ self new activate ] [ UIManager ...etc...
id: nil
creationTime: 2018-05-19T09:12:20.789686-04:00
SessionManager>>launchSnapshot:andQuit:
Receiver: a SessionManager
Arguments and temporary variables:
arg1: true
arg2: true
tmp1: true
tmp2: true
Receiver's instance variables:
currentSession: a WorkingSession
categories: an OrderedCollection(a SessionCategory(System) a SessionCategory(Ne...etc...
guiCategory: a SessionCategory(Graphical User Interface)
toolsCategory: a SessionCategory(Tools)
networkCategory: a SessionCategory(Network)
systemCategory: a SessionCategory(System)
userCategory: a SessionCategory(User)
[ tmp3 := self launchSnapshot: arg1 andQuit: arg2.
tmp1 signal ] in SessionManager>>snapshot:andQuit:
Receiver: a SessionManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
currentSession: a WorkingSession
categories: an OrderedCollection(a SessionCategory(System) a SessionCategory(Ne...etc...
guiCategory: a SessionCategory(Graphical User Interface)
toolsCategory: a SessionCategory(Tools)
networkCategory: a SessionCategory(Network)
systemCategory: a SessionCategory(System)
userCategory: a SessionCategory(User)
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
Receiver: [ tmp3 := self launchSnapshot: arg1 andQuit: arg2.
tmp1 signal ]
Arguments and temporary variables:
Receiver's instance variables:
outerContext: SessionManager>>snapshot:andQuit:
startpc: 71
numArgs: 0
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
LibC(Object)>>ffiCall:
LibC>>memCopy:to:size:
LibC class>>memCopy:to:size:
FreeTypeExternalMemory>>primCopyToExternalMemory:
FreeTypeExternalMemory>>validate
EmbeddedFreeTypeFontInstaller>>addFromFileContents:baseName:
LucidaGrandeRegular class(EmbeddedFreeTypeFontFontDescription class)>>installFontsIn:
[ :arg2 | arg2 installFontsIn: arg1 ] in EmbeddedFreeTypeFontFontDescription class>>installAllFontsIn:
OrderedCollection>>do:
EmbeddedFreeTypeFontFontDescription class>>installAllFontsIn:
EmbeddedFreeTypeFontInstaller>>installAllFontsIn:
[ :arg1 | arg1 installAllFontsIn: self ] in FreeTypeFontProvider>>updateEmbeddedFreeTypeFonts
OrderedCollection>>do:
FreeTypeFontProvider>>updateEmbeddedFreeTypeFonts
FreeTypeSettings class>>updateFreeType
FreeTypeSettings class>>startUp:
ClassSessionHandler>>startup:
[ :arg2 | arg2 startup: arg1 ] in WorkingSession>>runStartup:
[ arg2 value: arg3 ] in [ :arg3 |
[ arg2 value: arg3 ]
on: Exception
do: [ :arg4 | self errorHandler handleError: arg4 ] ] in WorkingSession>>runList:do:
BlockClosure>>on:do:
[ :arg3 |
[ arg2 value: arg3 ]
on: Exception
do: [ :arg4 | self errorHandler handleError: arg4 ] ] in WorkingSession>>runList:do:
Array(SequenceableCollection)>>do:
WorkingSession>>runList:do:
WorkingSession>>runStartup:
WorkingSession>>start:
SessionManager>>launchSnapshot:andQuit:
[ tmp3 := self launchSnapshot: arg1 andQuit: arg2.
tmp1 signal ] in SessionManager>>snapshot:andQuit:
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
Index: 0
theText: a Text for 'A cool title
Here an important message'
theContainer: (1@1) corner: (49@10000000)
isFirstLine: true
theTextStyle: a TextStyle Source Sans Pro
defaultLineHeight: 19
actualHeight: 19
wantsColumnBreaks: false
TextComposer>>multiComposeLinesFrom:to:delta:into:priorLines:atY:textStyle:text:container:wantsColumnBreaks:
Receiver: a TextComposer
Arguments and temporary variables:
arg1: 1
arg2: 38
arg3: 0
arg4: an OrderedCollection()
arg5: #()
arg6: 1
arg7: a TextStyle Source Sans Pro
arg8: a Text for 'A cool title
Here an important message'
arg9: (1@1) corner: (49@10000000)
arg10: false
Receiver's instance variables:
lines: an OrderedCollection()
maxRightX: 1
currentY: 1
scanner: a CompositionScanner
possibleSlide: false
nowSliding: false
prevIndex: 1
prevLines: #()
currCharIndex: 1
startCharIndex: 1
stopCharIndex: 38
deltaCharIndex: 0
theText: a Text for 'A cool title
Here an important message'
theContainer: (1@1) corner: (49@10000000)
isFirstLine: true
theTextStyle: a TextStyle Source Sans Pro
defaultLineHeight: 19
actualHeight: 19
wantsColumnBreaks: false
Paragraph>>multiComposeLinesFrom:to:delta:into:priorLines:atY:
Receiver: a Paragraph
Arguments and temporary variables:
arg1: 1
arg2: 38
arg3: 0
arg4: an OrderedCollection()
arg5: #()
arg6: 1
tmp1: nil
Receiver's instance variables:
text: a Text for 'A cool title
Here an important message'
textStyle: a TextStyle Source Sans Pro
firstCharacterIndex: 1
container: (1@1) corner: (49@10000000)
lines: nil
positionWhenComposed: (0@0)
offsetToEnd: 37
maxRightX: nil
selectionStart: nil
selectionStop: nil
wantsColumnBreaks: false
focused: nil
caretRect: nil
showCaret: nil
findReplaceSelectionRegex: nil
secondarySelection: nil
extraSelectionBlocks: nil
refreshExtraSelection: nil
composer: a TextComposer
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>xTable
CompositionScanner(CharacterScanner)>>setActualFont:
CompositionScanner>>setActualFont:
CompositionScanner(CharacterScanner)>>setFont:
TextFontChange>>emphasizeScanner:
(text attributesAt: lastIndex forStyle: textStyle) in CompositionScanner(CharacterScanner)>>setFont
Array(SequenceableCollection)>>do:
CompositionScanner(CharacterScanner)>>setFont
CompositionScanner>>setStopConditions
CompositionScanner>>composeFrom:inRectangle:firstLine:leftSide:rightSide:
TextComposer>>composeEachRectangleIn:
TextComposer>>composeAllRectangles:
TextComposer>>composeOneLine
TextComposer>>composeAllLines
TextComposer>>multiComposeLinesFrom:to:delta:into:priorLines:atY:textStyle:text:container:wantsColumnBreaks:
Paragraph>>multiComposeLinesFrom:to:delta:into:priorLines:atY:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
Paragraph>>composeAll
Paragraph>>compose:style:from:in:
GrowlMorph(TextMorph)>>paragraph
GrowlMorph(TextMorph)>>newContents:
GrowlMorph(TextMorph)>>contentsWrapped:
GrowlMorph>>streamDo:
GrowlMorph>>label:contents:
GrowlMorph>>initialize
GrowlMorph class(Behavior)>>new
GrowlMorph class>>label:contents:
GrowlMorph class>>openWithLabel:contents:
MorphicUIManager>>inform:
[ UIManager default inform: arg1 ] in StartupUIManager>>inform:
BlockClosure>>cull:
WorkingSession>>executeDeferredStartupActions:
WorkingSession>>runStartup:
WorkingSession>>start:
SessionManager>>launchSnapshot:andQuit:
[ tmp3 := self launchSnapshot: arg1 andQuit: arg2.
tmp1 signal ] in SessionManager>>snapshot:andQuit:
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.29097 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.314123 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.377933 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.445632 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.508109 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.530329 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.594895 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.664124 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.728531 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.773279 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.813464 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.884529 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.946715 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:21.967198 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.028337 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.090993 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
TTHERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.150739 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.171022 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.236337 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.301216 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.36317 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.405688 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.449656 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.510945 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.578292 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.597809 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.664171 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.722902 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.791349 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.81153 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.877564 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:22.944524 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:23.008643 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:23.051704 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:23.092896 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
TTHERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:23.155079 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:23.221324 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>widthOfString:
LabelMorph(StringMorph)>>measureContents
LabelMorph(StringMorph)>>fitContents
LabelMorph(StringMorph)>>contents:
PharoLightTheme(UITheme)>>windowLabelForText:
PharoLightTheme(UITheme)>>windowLabelFor:
SpecWindow(SystemWindow)>>initializeLabelArea
SpecWindow(SystemWindow)>>initialize
SpecWindow(StandardWindow)>>initialize
SpecWindow class(Behavior)>>new
MorphicWindowAdapter>>buildWidget
MorphicWindowAdapter(AbstractAdapter)>>adapt:
SpecInterpreter>>actionToPerformWithSelector:arguments:
SpecInterpreter>>performNextSelectorAndIncrementIndex
SpecInterpreter>>interpretASpec:selector:
SpecInterpreter>>interpretASpec:model:selector:
SpecInterpreter class>>private_interpretASpec:model:selector:
SpecInterpreter class>>private_buildWidgetFor:withSpec:
WindowPresenter(ComposablePresenter)>>privateAdapterFromModel:withSpec:
WindowPresenter>>buildWithSpecLayout:
WindowPresenter>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpecLayout:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec:
GTSpecPreDebugWindow(ComposablePresenter)>>openWithSpec
GTSpecPreDebugWindow(DynamicComposablePresenter)>>openWithSpec
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:
[ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>on:do:
[ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
WorldState>>runStepMethodsIn:
WorldMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldMorph>>doOneCycle
WorldMorph class>>doOneCycle
[ [ WorldMorph doOneCycle.
Processor yield.
false ] whileFalse: [ ] ] in MorphicUIManager>>spawnNewProcess
[ self value.
Processor terminateActive ] in BlockClosure>>newProcess
-------------------------------------------------------------------------------
THERE_BE_DRAGONS_HERE
FFIVariableNameNotFound: Could not find accessor for variable named "'aPointer'"
19 May 2018 9:12:23.2708 am
VM: Mac OS - intel - 1013.2 - CoInterpreter VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
StackToRegisterMappingCogit VMMaker.oscog-eem.2380 uuid: c76d37e1-445c-4e34-9796-fc836dfd50c9 May 9 2018
VM: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git Date: Wed May 9 10:36:12 2018 CommitHash: 334be97 Plugins: 201805090836 https://github.com/OpenSmalltalk/opensmalltalk-vm.git
Image: Pharo7.0alpha [Build information: Pharo-7.0+alpha.build.3.sha.b90156109489d468b9847b6b37a38f06957849d8 (32 Bit)]
FFICallout>>loaderForArgNamed:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>loaderForArgNamed:indirectIndex:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
tmp1: nil
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFICallout>>argName:indirectIndex:type:ptrArity:
Receiver: a FFICallout
Arguments and temporary variables:
arg1: 'aPointer'
arg2: nil
arg3: 'PointerHolder'
arg4: 1
tmp1: FFIExternalValueHolderType(a subclass of FFIExternalValueHolder)
Receiver's instance variables:
fnSpec: nil
options: a Dictionary()
requestor: FT2Library
methodArgs: #(#arg1)
receiver: nil
method: nil
FFIFunctionParser>>parseArgument
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
tmp2: 'aPointer'
tmp3: nil
tmp4: #('PointerHolder' 1)
tmp5: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseArguments
Receiver: a FFIFunctionParser
Arguments and temporary variables:
tmp1: nil
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFIFunctionParser>>parseNamedFunction:
Receiver: a FFIFunctionParser
Arguments and temporary variables:
arg1: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
tmp1: {$P. $o. $i. $n. $t. $e. $r. $H. $o. $l. $d. $e. $r. Character space. $*....etc...
tmp2: {$i. $n. $t. Character space. $F. $T. $_. $I. $n. $i. $t. $_. $F. $r. $e....etc...
tmp3: 'FT_Init_FreeType'
Receiver's instance variables:
requestor: a FFICallout
stream: a ReadStream
fnSpec: a FFIFunctionSpec
FFICalloutMethodBuilder>>parseSignature:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>generate
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutMethodBuilder>>build:
Receiver: a FFICalloutMethodBuilder
Arguments and temporary variables:
arg1: [ :arg3 |
| tmp6 |
tmp6 := arg3.
tmp6
signature: arg1;
sender: tmp1;
...etc...
Receiver's instance variables:
calloutAPI: a FFICalloutAPI
requestor: a FFICallout
sender: FT2Library>>ffiInitFreeType:
signature: #(#int #FT_Init_FreeType #(#PointerHolder #* #aPointer))
module: FT2FFILibrary
functionResolutionStrategies: an OrderedCollection(a FFICallbackFunctionResolut...etc...
FFICalloutAPI>>function:module:
Receiver: a FFICalloutAPI
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
context: FT2Library>>ffiInitFreeType:
options: #()
callingConvention: #cdecl
FT2Library(Object)>>ffiCall:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>ffiInitFreeType:
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
arg1: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>checkLibrary
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
tmp1: nil
tmp2: an a subclass of FFIExternalValueHolder
Receiver's instance variables:
handle: @ 16r00000000
FT2Library>>isAvailable
Receiver: a FT2Library(@ 16r00000000)<0x0>
Arguments and temporary variables:
Receiver's instance variables:
handle: @ 16r00000000
FreeTypeFontProvider>>fontFor:familyName:
Receiver: a FreeTypeFontProvider
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
arg2: 'Source Code Pro'
tmp1: nil
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: nil
tmp7: nil
Receiver's instance variables:
fileInfos: an OrderedCollection()
fileInfoCache: a Dictionary()
tempFileInfos: nil
families: a Dictionary()
tempFamilies: nil
fontInstallers: an OrderedCollection(an EmbeddedFreeTypeFontInstaller)
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
OrderedCollection>>do:
Receiver: an OrderedCollection(a FreeTypeFontProvider)
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
array: an Array(a FreeTypeFontProvider nil nil nil nil nil nil nil nil nil)
firstIndex: 1
lastIndex: 1
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
Array(SequenceableCollection)>>do:
Receiver: #('Source Code Pro')
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
#('Source Code Pro')
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a Set()
arg2: a Set()
arg3: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFontManager>>bestFontFor:
Receiver: a LogicalFontManager
Arguments and temporary variables:
arg1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
Receiver's instance variables:
fontProviders: an OrderedCollection(a FreeTypeFontProvider)
LogicalFont>>findRealFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>realFont
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
LogicalFont>>height
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
TextStyle>>newFontArray:
Receiver: a TextStyle Source Code Pro
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
fontArray: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
...etc...
lineGrid: nil
baseline: nil
alignment: nil
firstIndent: nil
restIndent: nil
rightIndent: nil
tabsArray: nil
marginTabsArray: nil
leading: 2
defaultFontIndex: 1
TextStyle class>>fontArray:
Receiver: TextStyle
Arguments and temporary variables:
arg1: an Array(a LogicalFont
familyName: Source Code Pro
emphasis: nil
point...etc...
Receiver's instance variables:
superclass: Object
methodDict: a MethodDictionary(#=->TextStyle>>#= #addNewFontSize:->TextStyle>>#...etc...
format: 65547
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #TextStyle
classPool: a Dictionary()
sharedPools: an OrderedCollection(TextConstants)
environment: a SystemDictionary(lots of globals)
category: #'Text-Core'
notifier: a Model
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
Dictionary(Collection)>>detect:ifFound:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ :arg3 | arg3 ]
arg3: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
Dictionary(Collection)>>detect:ifNone:
Receiver: a Dictionary(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 #'Bitmap Source Code ...etc...
Arguments and temporary variables:
arg1: [ :arg1 | arg1 fontArray includes: self ]
arg2: [ TextStyle fontArray: {self} ]
Receiver's instance variables:
tally: 3
array: an Array(#'Bitmap DejaVu Sans'->a TextStyle Bitmap DejaVu Sans 7 nil nil...etc...
LogicalFont(AbstractFont)>>textStyle
Receiver: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
realFont: nil we...etc...
Arguments and temporary variables:
Receiver's instance variables:
realFont: nil
emphasis: nil
familyName: 'Source Code Pro'
fallbackFamilyNames: nil
pointSize: 10
stretchValue: 5
weightValue: 400
slantValue: 0
derivatives: nil
boldDerivative: nil
italicDerivative: nil
boldItalicDerivative: nil
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Receiver: a FormCanvas on: DisplayScreen(976x665x32)
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
arg2: 1
arg3: 1336
arg4: (0@0)
arg5: nil
arg6: Color black
tmp1: a LogicalFont
familyName: Source Code Pro
emphasis: nil
pointSize: 10
...etc...
tmp2: nil
tmp3: nil
tmp4: nil
tmp5: nil
tmp6: 0
tmp7: Character cr
tmp8: 0
tmp9: nil
tmp10: nil
Receiver's instance variables:
origin: (0@0)
clipRect: (0@0) corner: (10000@10000)
form: DisplayScreen(976x665x32)
port: a GrafPort
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
Receiver: Transcripter
Arguments and temporary variables:
arg1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
tmp1: '*** System error handling failed ***
Original error: FFIVariableNameNotF...etc...
Receiver's instance variables:
superclass: ReadWriteStream
methodDict: a MethodDictionary(#black->Transcripter>>#black #clear->Transcripte...etc...
format: 65542
layout: a FixedLayout
organization: a ClassOrganization
subclasses: nil
name: #Transcripter
classPool: a Dictionary(#Icon->nil )
sharedPools: an OrderedCollection(EventSensorConstants)
environment: a SystemDictionary(lots of globals)
category: #EmergencyEvaluator
MorphicUIManager>>onPrimitiveError:
Receiver: a MorphicUIManager
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
activeTranscript: nil
DebugSession(Object)>>primitiveError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: 'Original error: FFIVariableNameNotFound: Could not find accessor for var...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
DebugSession>>signalDebuggerError:
Receiver: a DebugSession
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
name: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
interruptedContext: FFICallout>>loaderForArgNamed:
interruptedProcess: a Process in MorphicUIManager>>debugProcess:context:label:f...etc...
errorWasInUIProcess: true
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
Receiver: a MorphicUIManager
Arguments and temporary variables:
arg1: a Process in MorphicUIManager>>debugProcess:context:label:fullView:notifi...etc...
arg2: FFICallout>>loaderForArgNamed:
arg3: 'FFIVariableNameNotFound: Could not find accessor for variable named "''a...etc...
arg4: false
arg5: a DebugSession
tmp1: a DebugSession
arg6: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
activeTranscript: nil
BlockClosure>>cull:
Receiver: [ :arg6 | tmp1 signalDebuggerError: arg6 ]
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
outerContext: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
a...etc...
startpc: 129
numArgs: 1
Context>>evaluateSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
tmp1: nil
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
Context>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
arg1: FFIVariableNameNotFound: Could not find accessor for variable named "'aPo...etc...
Receiver's instance variables:
sender: [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
pc: 18
stackp: 2
method: BlockClosure>>#on:do:
closureOrNil: nil
receiver: [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNoti...etc...
--- The full stack ---
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
Array(SequenceableCollection)>>do:
LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
LogicalFontManager>>bestFontFor:
LogicalFont>>findRealFont
LogicalFont>>realFont
LogicalFont>>height
TextStyle>>newFontArray:
TextStyle class>>fontArray:
[ TextStyle fontArray: {self} ] in LogicalFont(AbstractFont)>>textStyle
Dictionary(Collection)>>detect:ifFound:ifNone:
Dictionary(Collection)>>detect:ifNone:
LogicalFont(AbstractFont)>>textStyle
FormCanvas>>drawString:from:to:autoBoundAt:font:color:
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :arg6 | tmp1 signalDebuggerError: arg6 ] in [ [ Smalltalk tools debugger
openOn: tmp1
withFullView: arg4
andNotification: arg5 ]
on: Error
do: [ :arg6 | tmp1 signalDebuggerError: arg6 ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification:
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
FFIVariableNameNotFound(Exception)>>signal
FFIVariableNameNotFound class(NotFound class)>>signalFor:
FFICallout>>loaderForArgNamed:
FFICallout>>loaderForArgNamed:indirectIndex:
FFICallout>>argName:indirectIndex:type:ptrArity:
FFIFunctionParser>>parseArgument
FFIFunctionParser>>parseArguments
FFIFunctionParser>>parseNamedFunction:
FFICalloutMethodBuilder>>parseSignature:
FFICalloutMethodBuilder>>generate
FFICalloutMethodBuilder>>build:
FFICalloutAPI>>function:module:
FT2Library(Object)>>ffiCall:
FT2Library>>ffiInitFreeType:
FT2Library>>checkLibrary
FT2Library>>isAvailable
FreeTypeFontProvider>>fontFor:familyName:
[ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ] in [ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil: [ ^ tmp3 emphasized: arg1 emphasis ] ] ] in LogicalFontManager>>bestFontFor:whenFindingAlternativeIgnoreAll:
OrderedCollection>>do:
[ :arg3 |
fontProviders
do: [ :arg4 |
| tmp4 tmp6 |
tmp6 := tmp4 := arg4 fontFor: arg1 familyName: arg3.
tmp6 ifNotNil: [ ^ tmp4 ] ].
tmp2 := TextStyle named: arg3.
tmp2
ifNotNil: [ tmp3 := tmp2 fontOfPointSize: arg1 pointSize.
tmp3 ifNotNil:
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment