[Vm-dev] VM Maker: VMMaker.oscog-eem.3192.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Jun 16 23:56:46 UTC 2022


Eliot Miranda uploaded a new version of VMMaker to project VM Maker:
http://source.squeak.org/VMMaker/VMMaker.oscog-eem.3192.mcz

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

Name: VMMaker.oscog-eem.3192
Author: eem
Time: 16 June 2022, 4:56:32.417273 pm
UUID: 5130b096-874d-45b8-8513-f7b8ae8a345d
Ancestors: VMMaker.oscog-eem.3191

Extend FileDialogPlugin for 'multiSelect'.

=============== Diff against VMMaker.oscog-eem.3191 ===============

Item was changed:
  ----- Method: FileDialogPlugin>>primitiveFileDialogGetResult (in category 'file dialogs') -----
  primitiveFileDialogGetResult
  	"Primitive. Retrieve the result of the file dialog.
  	Arguments:
  		dlgHandle:	Handle of the file dialog.
+ 	Return value: Array of strings for multiSelect, String for chosen file if not multiSelect, or nil if canceled"
- 	Return value: String for choosen file, or nil if canceled"
  	| dlgHandle cString |
  	<export: true>
  	<var: 'cString' type: #'char *'>
  	interpreterProxy methodArgumentCount = 1 ifFalse:
  		[^interpreterProxy primitiveFail].
  	dlgHandle := self stackDialogHandle: 0.
  	interpreterProxy failed ifFalse:
+ 		[(self fileDialogGetResults: dlgHandle)
+ 			ifNotNil:
+ 				[:results| interpreterProxy methodReturnValue: results]
+ 			ifNil:
+ 				[cString := self fileDialogGetResult: dlgHandle.
- 		[cString := self fileDialogGetResult: dlgHandle.
  		 interpreterProxy failed ifFalse:
+ 			[interpreterProxy methodReturnStringOrNil: cString]]]!
- 			[self methodReturnStringOrNil: cString]]!



More information about the Vm-dev mailing list