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

[commits at source.squeak.org]

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

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

Name: VMMaker.oscog-eem.3271
Author: eem
Time: 8 November 2022, 3:55:27.878812 pm
UUID: 720839b5-3779-4885-a0dc-f804b7404cea
Ancestors: VMMaker.oscog-eem.3270

Either of the two flavours of ioHasClipboardData:inFormat: may fail (be unimplemented).

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

Item was changed:
  ----- Method: ClipboardExtendedPlugin>>ioHasClipboardData:inFormat: (in category 'io') -----
  ioHasClipboardData: clipboard inFormat: format
+ 	| hasFormat |
  	self primitive: 'ioHasClipboardDataInFormat' parameters: #(Unsigned Oop).
  	(interpreterProxy isIntegerObject: format) ifTrue:
+ 		[hasFormat := self
+ 							sqPasteboard: clipboard asVoidPointer
+ 							hasDataInFormat: (interpreterProxy integerValueOf: format).
+ 		 interpreterProxy failed ifFalse:
+ 			[^hasFormat asBooleanObj]].
- 		[^(self
- 				sqPasteboard: clipboard asVoidPointer
- 				hasDataInFormat: (interpreterProxy integerValueOf: format)) asBooleanObj].
  	(interpreterProxy isBytes: format) ifTrue:
+ 		[hasFormat := self
+ 							sqPasteboard: clipboard asVoidPointer
+ 							hasDataInFormat: (interpreterProxy firstIndexableField: format)
+ 							formatLength: (interpreterProxy byteSizeOf: format).
+ 		 interpreterProxy failed ifFalse:
+ 			[^hasFormat asBooleanObj]].
- 		[^(self
- 				sqPasteboard: clipboard asVoidPointer
- 				hasDataInFormat: (interpreterProxy firstIndexableField: format)
- 				formatLength: (interpreterProxy byteSizeOf: format)) asBooleanObj].
  	interpreterProxy primitiveFailFor: PrimErrBadArgument!