FFI: FFI-Tools-mt.8.mcz

Marcel Taeumel uploaded a new version of FFI-Tools to project FFI:
http://source.squeak.org/FFI/FFI-Tools-mt.8.mcz

==================== Summary ====================

Name: FFI-Tools-mt.8
Author: mt
Time: 1 June 2020, 10:20:08.633523 am
UUID: 9d767c70-03f1-8c4d-a7cf-e30f2228a41e
Ancestors: FFI-Tools-mt.7

Complements FFI-Kernel-mt.85.

=============== Diff against FFI-Tools-mt.7 ===============

Item was added:
+ ----- Method: ExternalStructure class>>compositeKindName (in category '*FFI-Tools-printing') -----
+ compositeKindName
+ ^'struct'!

Item was added:
+ ----- Method: ExternalStructure>>compositeKindName (in category '*FFI-Tools-printing') -----
+ compositeKindName
+ ^self class compositeKindName!

Item was added:
+ ----- Method: ExternalType>>subStructureClassFor:in: (in category '*FFI-Tools-printing') -----
+ subStructureClassFor: fieldName in: structureClass
+ "fieldName is some field name within a structure that should be the selector of
+ the accessor method for the field within some structureClass.  Find the class for
+ the field by searching the defining class's accessor method."
+ | subStructureClassBinding |
+ subStructureClassBinding := (structureClass
+ compiledMethodAt: fieldName
+ ifAbsent: [self error: 'cannot find ', fieldName, ' in ', structureClass name, '. Perhaps ', structureClass name, ' definieFields is needed.'])
+ literals detect:
+ [:l| l isVariableBinding and: [l value inheritsFrom: ExternalStructure]].
+ ^subStructureClassBinding value!

Item was added:
+ ----- Method: ExternalUnion class>>compositeKindName (in category '*FFI-Tools-printing') -----
+ compositeKindName
+ ^'union'!