Eliot Miranda uploaded a new version of Files to project The Trunk: http://source.squeak.org/trunk/Files-eem.203.mcz
==================== Summary ====================
Name: Files-eem.203 Author: eem Time: 2 May 2023, 3:03:46.035929 pm UUID: 1f6149df-859d-47aa-8926-5a0d8c368377 Ancestors: Files-mt.202
Cheaper implementation of FileDirectory class>>extensionFor:. Include error code in StandardFileStream>>primClose: (latest VMs answer a meaningful error if primitiveFileClose fails).
=============== Diff against Files-mt.202 ===============
Item was changed: ----- Method: FileDirectory class>>extensionFor: (in category 'name utilities') ----- + extensionFor: fileNameString + "Answer the extension of the given file name string, if any, or the empty string if none." - extensionFor: fileName - "Return the extension of given file name, if any."
+ | i | + i := fileNameString lastIndexOf: DirectoryClass extensionDelimiter. + ^i = 0 + ifTrue: [''] + ifFalse: [fileNameString copyFrom: i + 1 to: fileNameString size]! - | delim i | - delim := DirectoryClass extensionDelimiter. - i := fileName findLast: [:c | c = delim]. - i = 0 - ifTrue: [^ ''] - ifFalse: [^ fileName copyFrom: i + 1 to: fileName size]. - !
Item was changed: ----- Method: StandardFileStream>>primClose: (in category 'primitives') ----- primClose: id "Close this file."
+ <primitive: 'primitiveFileClose' module: 'FilePlugin' error: ec> - <primitive: 'primitiveFileClose' module: 'FilePlugin'> self primitiveFailed !
squeak-dev@lists.squeakfoundation.org