Marcel Taeumel uploaded a new version of FFI-Tests to project FFI:
http://source.squeak.org/FFI/FFI-Tests-mt.15.mcz ==================== Summary ==================== Name: FFI-Tests-mt.15 Author: mt Time: 2 June 2020, 8:06:43.727821 pm UUID: 818c1c5c-afd3-8e47-b692-0c0de5697f8e Ancestors: FFI-Tests-nice.14 Updates example structs with up-to-date code generation format, i.e., those <generated> pragmas and #shortPointer or #longPointer instead of just #pointer. =============== Diff against FFI-Tests-nice.14 =============== Item was changed: ----- Method: FFISmallStruct1>>x (in category 'accessing') ----- x + "This method was automatically generated. See FFISmallStruct1 class>>fields." + <generated> - "This method was automatically generated" ^handle unsignedByteAt: 1! Item was changed: ----- Method: FFISmallStruct1>>x: (in category 'accessing') ----- x: anObject + "This method was automatically generated. See FFISmallStruct1 class>>fields." + <generated> - "This method was automatically generated" handle unsignedByteAt: 1 put: anObject! Item was changed: ----- Method: FFISmallStruct1>>y (in category 'accessing') ----- y + "This method was automatically generated. See FFISmallStruct1 class>>fields." + <generated> - "This method was automatically generated" ^handle unsignedByteAt: 2! Item was changed: ----- Method: FFISmallStruct1>>y: (in category 'accessing') ----- y: anObject + "This method was automatically generated. See FFISmallStruct1 class>>fields." + <generated> - "This method was automatically generated" handle unsignedByteAt: 2 put: anObject! Item was changed: ----- Method: FFITestCompoundStruct>>p1 (in category 'accessing') ----- p1 "This method was automatically generated. See FFITestCompoundStruct class>>fields." <generated> + ^FFISmallStruct1 fromHandle: (handle shortPointerAt: 5)! - ^FFISmallStruct1 fromHandle: (handle pointerAt: 9)! Item was changed: ----- Method: FFITestCompoundStruct>>p1: (in category 'accessing') ----- p1: anObject "This method was automatically generated. See FFITestCompoundStruct class>>fields." <generated> + handle shortPointerAt: 5 put: anObject getHandle.! - handle pointerAt: 9 put: anObject getHandle.! Item was changed: ----- Method: FFITestCompoundStruct>>p2 (in category 'accessing') ----- p2 "This method was automatically generated. See FFITestCompoundStruct class>>fields." <generated> + ^FFITestPoint2 fromHandle: (handle shortPointerAt: 17)! - ^FFITestPoint2 fromHandle: (handle pointerAt: 25)! Item was changed: ----- Method: FFITestCompoundStruct>>p2: (in category 'accessing') ----- p2: anObject "This method was automatically generated. See FFITestCompoundStruct class>>fields." <generated> + handle shortPointerAt: 17 put: anObject getHandle.! - handle pointerAt: 25 put: anObject getHandle.! Item was changed: ----- Method: FFITestCompoundStruct>>p4 (in category 'accessing') ----- p4 "This method was automatically generated. See FFITestCompoundStruct class>>fields." <generated> + ^FFITestPoint4 fromHandle: (handle shortPointerAt: 37)! - ^FFITestPoint4 fromHandle: (handle pointerAt: 49)! Item was changed: ----- Method: FFITestCompoundStruct>>p4: (in category 'accessing') ----- p4: anObject "This method was automatically generated. See FFITestCompoundStruct class>>fields." <generated> + handle shortPointerAt: 37 put: anObject getHandle.! - handle pointerAt: 49 put: anObject getHandle.! Item was changed: ----- Method: FFITestCompoundStruct>>s2 (in category 'accessing') ----- s2 "This method was automatically generated. See FFITestCompoundStruct class>>fields." <generated> + ^FFITestPoint2 fromHandle: (handle structAt: 9 length: 8)! - ^FFITestPoint2 fromHandle: (handle structAt: 17 length: 8)! Item was changed: ----- Method: FFITestCompoundStruct>>s2: (in category 'accessing') ----- s2: anObject "This method was automatically generated. See FFITestCompoundStruct class>>fields." <generated> + handle structAt: 9 put: anObject getHandle length: 8.! - handle structAt: 17 put: anObject getHandle length: 8.! Item was changed: ----- Method: FFITestCompoundStruct>>s4 (in category 'accessing') ----- s4 "This method was automatically generated. See FFITestCompoundStruct class>>fields." <generated> + ^FFITestPoint4 fromHandle: (handle structAt: 21 length: 16)! - ^FFITestPoint4 fromHandle: (handle structAt: 33 length: 16)! Item was changed: ----- Method: FFITestCompoundStruct>>s4: (in category 'accessing') ----- s4: anObject "This method was automatically generated. See FFITestCompoundStruct class>>fields." <generated> + handle structAt: 21 put: anObject getHandle length: 16.! - handle structAt: 33 put: anObject getHandle length: 16.! |
Free forum by Nabble | Edit this page |