XftFontDescription causes crash on snapshot restart

[Jan Vrany]

Steps to reproduce:

1. Star fresh Smalltalk/X
2. Save image
3. Restart from image.

One get following error:

NoHandlerError: XftFontDescription does not understand: #releaseFromDevice
process: id=0 name=scheduler
context: XftFontDescription(Object) >> doesNotUnderstand:  [0]
 ......: XftFontDescription(**NONE**) >> releaseFromDevice  [3]
 ......: [] in HostGraphicsDevice>>releaseDeviceFonts >> value:  [3]
 ......: WeakArray >> validElementsDo:  [5]
 ......: CachingRegistry(Registry) >> do:  [5]
 ......: GLXWorkstation(HostGraphicsDevice) >> releaseDeviceFonts  [2]
 ......: GLXWorkstation(DeviceWorkstation) >> reinitializeFor:  [15]
 ......: [] in UndefinedObject>>doIt >> value  [19]
 ......: Block >> on:do:  [11]
 ......: UndefinedObject(**DIRECTED**) >> doIt  [20]
 ......: Method(CompiledCode) >> valueWithReceiver:arguments:selector:search:sender:  [17]
 ......: [] in Parser>>evaluate:in:receiver:notifying:logged:ifFail:compile:checkForEndOfInput: >> value  [194]
 ......: QuerySignal >> answer:do:  [10]
 ......: [] in Parser>>evaluate:in:receiver:notifying:logged:ifFail:compile:checkForEndOfInput: >> value  [120]
 ......: UndefinedVariableError class(GenericException class) >> handle:do:  [14]
 ......: ByteCodeCompiler(Parser) >> evaluate:in:receiver:notifying:logged:ifFail:compile:checkForEndOfInput:  [113]
 ......: ByteCodeCompiler(Parser) >> evaluate:notifying:  [3]
 ......: EncodedStream(PeekableStream) >> fileInNextChunkNotifying:passChunk:silent:  [37]
 ......: EncodedStream(PeekableStream) >> fileInNextChunkNotifying:passChunk:  [14]
 ......: [] in EncodedStream>>basicFileInNotifying:passChunk: >> value  [146]
 ......: SignalSet >> handle:do:  [14]
 ......: EncodedStream >> basicFileInNotifying:passChunk:  [100]
 ......: EncodedStream(PeekableStream) >> fileInNotifying:passChunk:  [6]
 ......: [] in PeekableStream>>fileIn >> value  [14]
 ......: QuerySignal(Signal) >> handle:do:  [14]
 ......: EncodedStream(PeekableStream) >> fileIn  [11]
 ......: SmalltalkChunkFileSourceReader >> fileInStream:  [2]
 ......: SmalltalkChunkFileSourceReader class(AbstractSourceFileReader class) >> fileInStream:  [3]
 ......:  [** intermediate recursive contexts skipped **]
 ......: SmalltalkChunkFileSourceReader class(AbstractSourceFileReader class) >> fileInStream:  [3]
 ......: SmalltalkLanguage(ProgrammingLanguage) >> fileInStream:  [3]
 ......:  [** intermediate recursive contexts skipped **]
 ......: SmalltalkLanguage(ProgrammingLanguage) >> fileInStream:  [3]
 ......: [] in Smalltalk class>>fileInStream:lazy:silent:logged:addPath: >> value  [37]
 ......: SignalSet >> answer:do:  [10]
 ......: [] in Smalltalk class>>fileInStream:lazy:silent:logged:addPath: >> value  [33]
 ......: Block >> ensure:  [11]
 ......: Smalltalk class >> fileInStream:lazy:silent:logged:addPath:  [39]
 ......: Smalltalk class >> fileIn:lazy:silent:logged:  [60]
 ......: Smalltalk class >> fileIn:  [10]
 ......: [] in Smalltalk class>>restart >> value  [146]
 ......: [] in ClassDescription>>withoutUpdatingChangesDo: >> value  [9]
 ......:  [** intermediate recursive contexts skipped **]
 ......: [] in ClassDescription>>withoutUpdatingChangesDo: >> value  [9]
 ......: SignalSet >> answer:do:  [10]
 ......: Class class(ClassDescription) >> withoutUpdatingChangesDo:  [7]
 ......: [] in Smalltalk class>>restart >> value  [143]
 ......: Block >> on:do:  [11]
 ......: Smalltalk class >> restart  [149]
 ......: UndefinedObject >> nil  [0]
 ......: nil
Type "c" to proceed, "?" for help
MiniDebugger> 

[Jan Vrany]

Fixed in XftFontDescription 1.41