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

commits at source.squeak.org commits at source.squeak.org
Wed Oct 14 18:01:15 UTC 2020


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

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

Name: VMMaker.oscog-eem.2840
Author: eem
Time: 14 October 2020, 11:01:06.097256 am
UUID: e2709af7-a070-4ba8-afa4-84d4061bbe73
Ancestors: VMMaker.oscog-eem.2839

Add a primCameraUID primitive, to equal facilities in teh Qwaq QWebcam plugin (even thoguh this appears inoperative on Windows).
Add module start-up and shutdown operaitonsd, useful for cleanup.

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

Item was added:
+ ----- Method: CameraPlugin>>initialiseModule (in category 'initialize-release') -----
+ initialiseModule
+ 	<export: true>
+ 	^self cameraInit!

Item was changed:
  ----- Method: CameraPlugin>>primCameraName (in category 'primitives') -----
  primCameraName
  	"Answer the name for the camera with the given number.
  	 Fail if the camera number is less than one or greater than the number of available cameras."
  
  	<export: true>
  	| cameraNum |
  	cameraNum := interpreterProxy stackIntegerValue: 0.
  	interpreterProxy failed ifFalse:
+ 		[interpreterProxy methodReturnString: (self CameraName: cameraNum)] "fails for a NULL string..."!
- 		[interpreterProxy methodReturnString: (self CameraName: cameraNum)]!

Item was added:
+ ----- Method: CameraPlugin>>primCameraUID (in category 'primitives') -----
+ primCameraUID
+ 	"Answer a UID for the camera with the given number.
+ 	 Fail if the camera number is less than one or greater than the number of available cameras."
+ 
+ 	<export: true>
+ 	| cameraNum |
+ 	cameraNum := interpreterProxy stackIntegerValue: 0.
+ 	interpreterProxy failed ifFalse:
+ 		[interpreterProxy methodReturnString: (self CameraUID: cameraNum)] "fails for a NULL string..."!

Item was added:
+ ----- Method: CameraPlugin>>shutdownModule (in category 'initialize-release') -----
+ shutdownModule
+ 	<export: true>
+ 	^self cameraShutdown!



More information about the Vm-dev mailing list