FFI: FFI-Pools-mt.20.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

FFI: FFI-Pools-mt.20.mcz

commits-2
Marcel Taeumel uploaded a new version of FFI-Pools to project FFI:
http://source.squeak.org/FFI/FFI-Pools-mt.20.mcz

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

Name: FFI-Pools-mt.20
Author: mt
Time: 2 June 2020, 8:26:38.439853 pm
UUID: 1aa86859-8c1f-9640-aad7-d5799f9e226c
Ancestors: FFI-Pools-mt.19

Due to the tricky load order of "FFI-Pools" before "FFI-Kernel" because of FFIConstants, lazily trigger the init code for that extra information about atomic types.

=============== Diff against FFI-Pools-mt.19 ===============

Item was removed:
- ----- Method: ExternalPoolReadWriter class>>initialize (in category 'class initialization') -----
- initialize
-
- "self initializeAtomicTypesExtra."!

Item was changed:
  ----- Method: ExternalPoolReadWriter>>cFormatPlaceholderFor: (in category 'writing - support') -----
  cFormatPlaceholderFor: externalType
  "Limit access to printf format placeholders to instances of pool read-writers only."
 
+ AtomicCFormatPlaceholders ifNil: [self class initializeAtomicTypesExtra].
+
  ^ externalType isPointerType
  ifTrue: ['%p']
  ifFalse: [
  AtomicCFormatPlaceholders
  at: externalType atomicType
  ifAbsent: [nil]]!

Item was changed:
  ----- Method: ExternalPoolReadWriter>>cTypeNameFor: (in category 'writing - support') -----
  cTypeNameFor: externalType
  "Limit access to C type names to instances of pool read-writers only."
 
  | cTypeName |
+ AtomicCTypeNames ifNil: [self class initializeAtomicTypesExtra].
+
  cTypeName := AtomicCTypeNames
  at: externalType atomicType
  ifAbsent: [nil].
 
  ^ externalType isPointerType
  ifTrue: [cTypeName, ' *']
  ifFalse: [cTypeName]!