[squeak-dev] FFI: FFI-Tests-mt.25.mcz

commits at source.squeak.org commits at source.squeak.org
Tue May 4 14:52:21 UTC 2021


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

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

Name: FFI-Tests-mt.25
Author: mt
Time: 4 May 2021, 4:52:20.680881 pm
UUID: 7168c581-7b46-2243-bc64-c48a504ce87c
Ancestors: FFI-Tests-mt.24

More tests. Complements FFI-Kernel-mt.130

=============== Diff against FFI-Tests-mt.24 ===============

Item was added:
+ ----- Method: ExternalStructureTests>>test07AccessingArrays (in category 'tests') -----
+ test07AccessingArrays
+ 
+ 	| data |
+ 	data := FFITestSdA5i new.
+ 	self assert: data a5i2 first equals: 0.
+ 	data writer a5i2 at: 1 put: 42.
+ 	self assert: data a5i2 first equals: 42.
+ 	
+ 	data := heapObject := FFITestSdA5i externalNew.
+ 	data zeroMemory.
+ 	self assert: data a5i2 first equals: 0.
+ 	data a5i2 at: 1 put: 42.
+ 	self assert: data a5i2 first equals: 42.!

Item was added:
+ ----- Method: FFITestLibrary class>>ffiTestArrayType (in category 'mocks') -----
+ ffiTestArrayType
+ 
+ 	<cdecl: char[] 'ffiTestArrayType' (float[5] FFITestPoint2[10] int[0]) module: 'SqueakFFIPrims'>
+ 	^ self externalCallFailed !

Item was added:
+ ExternalStructure subclass: #FFITestSdA5i
+ 	instanceVariableNames: ''
+ 	classVariableNames: ''
+ 	poolDictionaries: ''
+ 	category: 'FFI-Tests-Fixtures'!

Item was added:
+ ----- Method: FFITestSdA5i class>>fields (in category 'as yet unclassified') -----
+ fields
+ 	"
+ 	FFITestSdA5i defineFields
+ 	"
+ 	^ #(
+ 	(d1 'double')
+ 	(a5i2 'int32_t[5]')
+ 	)!

Item was added:
+ ----- Method: FFITypeNameTests>>testArray (in category 'tests') -----
+ testArray
+ 
+ 	(self argTypesAt: #ffiTestArrayType)	do: [:type |
+ 		self
+ 			assert: type isPointerType;
+ 			deny: type isArrayType;
+ 			assert: type asNonPointerType isArrayType;
+ 			assert: type asNonPointerType size >= 0]!



More information about the Squeak-dev mailing list