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'!