[squeak-dev] The Trunk: Balloon-eem.23.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Aug 16 00:00:01 UTC 2013


Eliot Miranda uploaded a new version of Balloon to project The Trunk:
http://source.squeak.org/trunk/Balloon-eem.23.mcz

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

Name: Balloon-eem.23
Author: eem
Time: 15 August 2013, 4:59:40.586 pm
UUID: 393b19e2-0b3c-48b5-acd0-e9f9aa4b7961
Ancestors: Balloon-fbs.22, Balloon-ar.19

Merge changes from OpenQwaq (needed by Cog VM)

=============== Diff against Balloon-fbs.22 ===============

Item was changed:
  ----- Method: BalloonEngine class>>doProfileStats: (in category 'accessing') -----
  doProfileStats: aBool
  	"Note: On Macintosh systems turning on profiling can significantly
  	degrade the performance of Balloon since we're using the high
  	accuracy timer for measuring."
  	"BalloonEngine doProfileStats: true"
  	"BalloonEngine doProfileStats: false"
+ 	<primitive: 'primitiveDoProfileStats' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveDoProfileStats' module: 'B2DPlugin'>
  	^false!

Item was changed:
  ----- Method: BalloonEngine class>>primitiveSetBitBltPlugin: (in category 'private') -----
  primitiveSetBitBltPlugin: pluginName
+ 	<primitive: 'primitiveSetBitBltPlugin' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveSetBitBltPlugin' module: 'B2DPlugin'>
  	^nil!

Item was changed:
  ----- Method: BalloonEngine>>bitBlt: (in category 'accessing') -----
  bitBlt: aBitBlt
+ 	| destWidth |
  	bitBlt := aBitBlt.
  	bitBlt isNil ifTrue:[^self].
+ 	destWidth := bitBlt destForm width.
+ 	destWidth > span size ifTrue:[span := Bitmap new: destWidth].
  	self class primitiveSetBitBltPlugin: bitBlt getPluginName.
  	self clipRect: bitBlt clipRect.
  	bitBlt 
  		sourceForm: (Form extent: span size @ 1 depth: 32 bits: span);
  		sourceRect: (0 at 0 extent: 1 at span size);
  		colorMap: (Color colorMapIfNeededFrom: 32 to: bitBlt destForm depth);
  		combinationRule: (bitBlt destForm depth >= 8 ifTrue:[34] ifFalse:[Form paint]).!

Item was changed:
  ----- Method: BalloonEngine>>initialize (in category 'initialize') -----
  initialize
- 	| w |
- 	w := Display width > 2048 ifTrue: [ 4096 ] ifFalse: [ 2048 ].
  	externals := OrderedCollection new: 100.
+ 	span := Bitmap new: 2048.
- 	span := Bitmap new: w.
  	bitBlt := nil.
  	self bitBlt: ((BitBlt toForm: Display) destRect: Display boundingBox; yourself).
  	forms := #().
  	deferred := false.!

Item was changed:
  ----- Method: BalloonEngine>>primAddActiveEdgeTableEntryFrom: (in category 'primitives-incremental') -----
  primAddActiveEdgeTableEntryFrom: edgeEntry
  	"Add edge entry to the AET."
+ 	<primitive: 'primitiveAddActiveEdgeEntry' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveAddActiveEdgeEntry' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddActiveEdgeTableEntryFrom: edgeEntry
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primAddBezierFrom:to:via:leftFillIndex:rightFillIndex: (in category 'primitives-adding') -----
  primAddBezierFrom: start to: end via: via leftFillIndex: leftFillIndex rightFillIndex: rightFillIndex
+ 	<primitive: 'primitiveAddBezier' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveAddBezier' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddBezierFrom: start to: end via: via leftFillIndex: leftFillIndex rightFillIndex: rightFillIndex
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primAddBezierShape:segments:fill:lineWidth:lineFill: (in category 'primitives-adding') -----
  primAddBezierShape: points segments: nSegments fill: fillStyle lineWidth: lineWidth lineFill: lineFill
+ 	<primitive: 'primitiveAddBezierShape' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveAddBezierShape' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddBezierShape: points segments: nSegments fill: fillStyle lineWidth: lineWidth lineFill: lineFill
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primAddBitmapFill:colormap:tile:from:along:normal:xIndex: (in category 'primitives-adding') -----
  primAddBitmapFill: form colormap: cmap tile: tileFlag from: origin along: direction normal: normal xIndex: xIndex
+ 	<primitive: 'primitiveAddBitmapFill' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveAddBitmapFill' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddBitmapFill: form colormap: cmap tile: tileFlag from: origin along: direction normal: normal xIndex: xIndex
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primAddCompressedShape:segments:leftFills:rightFills:lineWidths:lineFills:fillIndexList: (in category 'primitives-adding') -----
  primAddCompressedShape: points segments: nSegments leftFills: leftFills rightFills: rightFills lineWidths: lineWidths lineFills: lineFills fillIndexList: fillIndexList
+ 	<primitive: 'primitiveAddCompressedShape' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveAddCompressedShape' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddCompressedShape: points segments: nSegments leftFills: leftFills rightFills: rightFills lineWidths: lineWidths lineFills: lineFills fillIndexList: fillIndexList
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primAddExternalEdge:initialX:initialY:initialZ:leftFillIndex:rightFillIndex: (in category 'primitives-adding') -----
  primAddExternalEdge: index initialX: initialX initialY: initialY initialZ: initialZ leftFillIndex: leftFillIndex rightFillIndex: rightFillIndex
+ 	<primitive: 'primitiveRegisterExternalEdge' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveRegisterExternalEdge' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddExternalEdge: index initialX: initialX initialY: initialY initialZ: initialZ leftFillIndex: leftFillIndex rightFillIndex: rightFillIndex
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primAddExternalFill: (in category 'primitives-adding') -----
  primAddExternalFill: index
+ 	<primitive: 'primitiveRegisterExternalFill' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveRegisterExternalFill' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddExternalFill: index
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primAddGradientFill:from:along:normal:radial: (in category 'primitives-adding') -----
  primAddGradientFill: colorRamp from: origin along: direction normal: normal radial: isRadial
+ 	<primitive: 'primitiveAddGradientFill' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveAddGradientFill' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddGradientFill: colorRamp 
  				from: origin 
  				along: direction 
  				normal: normal 
  				radial: isRadial
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primAddLineFrom:to:leftFillIndex:rightFillIndex: (in category 'primitives-adding') -----
  primAddLineFrom: start to: end leftFillIndex: leftFillIndex rightFillIndex: rightFillIndex
+ 	<primitive: 'primitiveAddLine' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveAddLine' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddLineFrom: start to: end leftFillIndex: leftFillIndex rightFillIndex: rightFillIndex
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primAddOvalFrom:to:fillIndex:borderWidth:borderColor: (in category 'primitives-adding') -----
  primAddOvalFrom: start to: end fillIndex: fillIndex borderWidth: width borderColor: pixelValue32
+ 	<primitive: 'primitiveAddOval' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveAddOval' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddOvalFrom: start to: end fillIndex: fillIndex borderWidth: width borderColor: pixelValue32
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primAddPolygon:segments:fill:lineWidth:lineFill: (in category 'primitives-adding') -----
  primAddPolygon: points segments: nSegments fill: fillStyle lineWidth: lineWidth lineFill: lineFill
+ 	<primitive: 'primitiveAddPolygon' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveAddPolygon' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddPolygon: points segments: nSegments fill: fillStyle lineWidth: lineWidth lineFill: lineFill
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primAddRectFrom:to:fillIndex:borderWidth:borderColor: (in category 'primitives-adding') -----
  primAddRectFrom: start to: end fillIndex: fillIndex borderWidth: width borderColor: pixelValue32
+ 	<primitive: 'primitiveAddRect' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveAddRect' module: 'B2DPlugin'>
  	(self canProceedAfter: self primGetFailureReason) ifTrue:[
  		^self primAddRectFrom: start to: end fillIndex: fillIndex borderWidth: width borderColor: pixelValue32
  	].
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primChangeActiveEdgeTableEntryFrom: (in category 'primitives-incremental') -----
  primChangeActiveEdgeTableEntryFrom: edgeEntry
  	"Change the entry in the active edge table from edgeEntry"
+ 	<primitive: 'primitiveChangedActiveEdgeEntry' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveChangedActiveEdgeEntry' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primClipRectInto: (in category 'primitives-access') -----
  primClipRectInto: rect
+ 	<primitive: 'primitiveGetClipRect' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveGetClipRect' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primCopyBufferFrom:to: (in category 'primitives-misc') -----
  primCopyBufferFrom: oldBuffer to: newBuffer
  	"Copy the contents of oldBuffer into the (larger) newBuffer"
+ 	<primitive: 'primitiveCopyBuffer' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveCopyBuffer' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primDisplaySpanBuffer (in category 'primitives-incremental') -----
  primDisplaySpanBuffer
  	"Display the current scan line if necessary"
+ 	<primitive: 'primitiveDisplaySpanBuffer' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveDisplaySpanBuffer' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primFinishedProcessing (in category 'primitives-incremental') -----
  primFinishedProcessing
  	"Return true if there are no more entries in AET and GET and the last scan line has been displayed"
+ 	<primitive: 'primitiveFinishedProcessing' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveFinishedProcessing' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primFlushNeeded (in category 'primitives-access') -----
  primFlushNeeded
+ 	<primitive: 'primitiveNeedsFlush' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveNeedsFlush' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primFlushNeeded: (in category 'primitives-access') -----
  primFlushNeeded: aBoolean
+ 	<primitive: 'primitiveNeedsFlushPut' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveNeedsFlushPut' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primGetAALevel (in category 'primitives-access') -----
  primGetAALevel
  	"Set the AA level"
+ 	<primitive: 'primitiveGetAALevel' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveGetAALevel' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primGetBezierStats: (in category 'primitives-access') -----
  primGetBezierStats: statsArray
+ 	<primitive: 'primitiveGetBezierStats' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveGetBezierStats' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primGetClipRect: (in category 'primitives-access') -----
  primGetClipRect: rect
+ 	<primitive: 'primitiveGetClipRect' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveGetClipRect' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primGetCounts: (in category 'primitives-access') -----
  primGetCounts: statsArray
+ 	<primitive: 'primitiveGetCounts' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveGetCounts' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primGetDepth (in category 'primitives-access') -----
  primGetDepth
+ 	<primitive: 'primitiveGetDepth' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveGetDepth' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primGetFailureReason (in category 'primitives-access') -----
  primGetFailureReason
+ 	<primitive: 'primitiveGetFailureReason' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveGetFailureReason' module: 'B2DPlugin'>
  	^0!

Item was changed:
  ----- Method: BalloonEngine>>primGetOffset (in category 'primitives-access') -----
  primGetOffset
+ 	<primitive: 'primitiveGetOffset' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveGetOffset' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primGetTimes: (in category 'primitives-access') -----
  primGetTimes: statsArray
+ 	<primitive: 'primitiveGetTimes' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveGetTimes' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primInitializeBuffer: (in category 'primitives-misc') -----
  primInitializeBuffer: buffer
+ 	<primitive: 'primitiveInitializeBuffer' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveInitializeBuffer' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primInitializeProcessing (in category 'primitives-incremental') -----
  primInitializeProcessing
  	"Initialize processing in the GE.
  	Create the active edge table and sort it."
+ 	<primitive: 'primitiveInitializeProcessing' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveInitializeProcessing' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primMergeFill:from: (in category 'primitives-incremental') -----
  primMergeFill: fillBitmap from: fill
  	"Merge the filled bitmap into the current output buffer."
+ 	<primitive: 'primitiveMergeFillFrom' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveMergeFillFrom' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primNextActiveEdgeEntryInto: (in category 'primitives-incremental') -----
  primNextActiveEdgeEntryInto: edgeEntry
  	"Store the next entry of the AET at the current y-value in edgeEntry.
  	Return false if there is no entry, true otherwise."
+ 	<primitive: 'primitiveNextActiveEdgeEntry' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveNextActiveEdgeEntry' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primNextFillEntryInto: (in category 'primitives-incremental') -----
  primNextFillEntryInto: fillEntry
  	"Store the next fill entry of the active edge table in fillEntry.
  	Return false if there is no such entry, true otherwise"
+ 	<primitive: 'primitiveNextFillEntry' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveNextFillEntry' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primNextGlobalEdgeEntryInto: (in category 'primitives-incremental') -----
  primNextGlobalEdgeEntryInto: edgeEntry
  	"Store the next entry of the GET at the current y-value in edgeEntry.
  	Return false if there is no entry, true otherwise."
+ 	<primitive: 'primitiveNextGlobalEdgeEntry' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveNextGlobalEdgeEntry' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primRenderImage:with: (in category 'primitives-incremental') -----
  primRenderImage: edge with: fill
  	"Start/Proceed rendering the current scan line"
+ 	<primitive: 'primitiveRenderImage' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveRenderImage' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primRenderScanline:with: (in category 'primitives-incremental') -----
  primRenderScanline: edge with: fill
  	"Start/Proceed rendering the current scan line"
+ 	<primitive: 'primitiveRenderScanline' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveRenderScanline' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primSetAALevel: (in category 'primitives-access') -----
  primSetAALevel: level
  	"Set the AA level"
+ 	<primitive: 'primitiveSetAALevel' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveSetAALevel' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primSetClipRect: (in category 'primitives-access') -----
  primSetClipRect: rect
+ 	<primitive: 'primitiveSetClipRect' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveSetClipRect' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primSetColorTransform: (in category 'primitives-access') -----
  primSetColorTransform: transform
+ 	<primitive: 'primitiveSetColorTransform' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveSetColorTransform' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primSetDepth: (in category 'primitives-access') -----
  primSetDepth: depth
+ 	<primitive: 'primitiveSetDepth' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveSetDepth' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primSetEdgeTransform: (in category 'primitives-access') -----
  primSetEdgeTransform: transform
+ 	<primitive: 'primitiveSetEdgeTransform' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveSetEdgeTransform' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  ----- Method: BalloonEngine>>primSetOffset: (in category 'primitives-access') -----
  primSetOffset: point
+ 	<primitive: 'primitiveSetOffset' module: 'B2DPlugin' error: errorCode>
- 	<primitive: 'primitiveSetOffset' module: 'B2DPlugin'>
  	^self primitiveFailed!

Item was changed:
  SharedPool subclass: #BalloonEngineConstants
  	instanceVariableNames: ''
+ 	classVariableNames: 'BEAaLevelIndex BEBalloonEngineSize BEBitBltIndex BEClipRectIndex BEColorTransformIndex BEDeferredIndex BEDestOffsetIndex BEEdgeTransformIndex BEExternalsIndex BEFormsIndex BEPostFlushNeededIndex BESpanIndex BEWorkBufferIndex ETBalloonEdgeDataSize ETIndexIndex ETLinesIndex ETSourceIndex ETXValueIndex ETYValueIndex ETZValueIndex FTBalloonFillDataSize FTDestFormIndex FTIndexIndex FTMaxXIndex FTMinXIndex FTSourceIndex FTYValueIndex GBBaseSize GBBitmapDepth GBBitmapHeight GBBitmapRaster GBBitmapSize GBBitmapWidth GBColormapOffset GBColormapSize GBEndX GBEndY GBFinalX GBMBaseSize GBTileFlag GBUpdateDDX GBUpdateDDY GBUpdateDX GBUpdateDY GBUpdateData GBUpdateX GBUpdateY GBViaX GBViaY GBWideEntry GBWideExit GBWideExtent GBWideFill GBWideSize GBWideUpdateData GBWideWidth GEBaseEdgeSize GEBaseFillSize GEEdgeClipFlag GEEdgeFillsInvalid GEFAlreadyFailed GEFBadPoint GEFBitBltLoadFailed GEFClassMismatch GEFEdgeDataTooSmall GEFEngineIsInteger GEFEngineIsWords GEFEngineStopped GEFEngineTooSmall GEFEntityCheckFailed GEFEntityLoadFailed GEFFillDataTooSmall GEFFormLoadFailed GEFSizeMismatch GEFWorkBufferBadMagic GEFWorkBufferIsInteger GEFWorkBufferIsPointers GEFWorkBufferStartWrong GEFWorkBufferTooSmall GEFWorkBufferWrongSize GEFWorkTooBig GEFWrongEdge GEFWrongFill GEFWrongState GEFillIndexLeft GEFillIndexRight GENumLines GEObjectIndex GEObjectLength GEObjectType GEObjectUnused GEPrimitiveBezier GEPrimitiveClippedBitmapFill GEPrimitiveEdge GEPrimitiveEdgeMask GEPrimitiveFill GEPrimitiveFillMask GEPrimitiveLine GEPrimitiveLinearGradientFill GEPrimitiveRadialGradientFill GEPrimitiveRepeatedBitmapFill GEPrimitiveTypeMask GEPrimitiveUnknown GEPrimitiveWide GEPrimitiveWideBezier GEPrimitiveWideEdge GEPrimitiveWideLine GEPrimitiveWideMask GEStateAddingFromGET GEStateBlitBuffer GEStateCompleted GEStateScanningAET GEStateUnlocked GEStateUpdateEdges GEStateWaitingChange GEStateWaitingForEdge GEStateWaitingForFill GEXValue GEYValue GEZValue GErrorAETEntry GErrorBadState GErrorFillEntry GErrorGETEntry GErrorNeedFlush GErrorNoMoreSpace GFDirectionX GFDirectionY GFNormalX GFNormalY GFOriginX GFOriginY GFRampLength GFRampOffset GGBaseSize GLBaseSize GLEndX GLEndY GLError GLErrorAdjDown GLErrorAdjUp GLWideEntry GLWideExit GLWideExtent GLWideFill GLWideSize GLWideWidth GLXDirection GLXIncrement GLYDirection GWAAColorMask GWAAColorShift GWAAHalfPixel GWAALevel GWAAScanMask GWAAShift GWAETStart GWAETUsed GWBezierHeightSubdivisions GWBezierLineConversions GWBezierMonotonSubdivisions GWBezierOverflowSubdivisions GWBufferTop GWClearSpanBuffer GWClipMaxX GWClipMaxY GWClipMinX GWClipMinY GWColorTransform GWCountAddAETEntry GWCountChangeAETEntry GWCountDisplaySpan GWCountFinishTest GWCountInitializing GWCountMergeFill GWCountNextAETEntry GWCountNextFillEntry GWCountNextGETEntry GWCurrentY GWCurrentZ GWDestOffsetX GWDestOffsetY GWEdgeTransform GWFillMaxX GWFillMaxY GWFillMinX GWFillMinY GWFillOffsetX GWFillOffsetY GWGETStart GWGETUsed GWHasClipShapes GWHasColorTransform GWHasEdgeTransform GWHeaderSize GWLastExportedEdge GWLastExportedFill GWLastExportedLeftX GWLastExportedRightX GWMagicIndex GWMagicNumber GWMinimalSize GWNeedsFlush GWObjStart GWObjUsed GWPoint1 GWPoint2 GWPoint3 GWPoint4 GWPointListFirst GWSize GWSpanEnd GWSpanEndAA GWSpanSize GWSpanStart GWState GWStopReason GWTimeAddAETEntry GWTimeChangeAETEntry GWTimeDisplaySpan GWTimeFinishTest GWTimeInitializing GWTimeMergeFill GWTimeNextAETEntry GWTimeNextFillEntry GWTimeNextGETEntry'
- 	classVariableNames: 'BEAaLevelIndex BEBalloonEngineSize BEBitBltIndex BEClipRectIndex BEColorTransformIndex BEDeferredIndex BEDestOffsetIndex BEEdgeTransformIndex BEExternalsIndex BEFormsIndex BEPostFlushNeededIndex BESpanIndex BEWorkBufferIndex ETBalloonEdgeDataSize ETIndexIndex ETLinesIndex ETSourceIndex ETXValueIndex ETYValueIndex ETZValueIndex FTBalloonFillDataSize FTDestFormIndex FTIndexIndex FTMaxXIndex FTMinXIndex FTSourceIndex FTYValueIndex GBBaseSize GBBitmapDepth GBBitmapHeight GBBitmapRaster GBBitmapSize GBBitmapWidth GBColormapOffset GBColormapSize GBEndX GBEndY GBFinalX GBMBaseSize GBTileFlag GBUpdateDDX GBUpdateDDY GBUpdateDX GBUpdateDY GBUpdateData GBUpdateX GBUpdateY GBViaX GBViaY GBWideEntry GBWideExit GBWideExtent GBWideFill GBWideSize GBWideUpdateData GBWideWidth GEBaseEdgeSize GEBaseFillSize GEEdgeClipFlag GEEdgeFillsInvalid GEFillIndexLeft GEFillIndexRight GENumLines GEObjectIndex GEObjectLength GEObjectType GEObjectUnused GEPrimitiveBezier GEPrimitiveClippedBitmapFill GEPrimitiveEdge GEPrimitiveEdgeMask GEPrimitiveFill GEPrimitiveFillMask GEPrimitiveLine GEPrimitiveLinearGradientFill GEPrimitiveRadialGradientFill GEPrimitiveRepeatedBitmapFill GEPrimitiveTypeMask GEPrimitiveUnknown GEPrimitiveWide GEPrimitiveWideBezier GEPrimitiveWideEdge GEPrimitiveWideLine GEPrimitiveWideMask GEStateAddingFromGET GEStateBlitBuffer GEStateCompleted GEStateScanningAET GEStateUnlocked GEStateUpdateEdges GEStateWaitingChange GEStateWaitingForEdge GEStateWaitingForFill GEXValue GEYValue GEZValue GErrorAETEntry GErrorBadState GErrorFillEntry GErrorGETEntry GErrorNeedFlush GErrorNoMoreSpace GFDirectionX GFDirectionY GFNormalX GFNormalY GFOriginX GFOriginY GFRampLength GFRampOffset GGBaseSize GLBaseSize GLEndX GLEndY GLError GLErrorAdjDown GLErrorAdjUp GLWideEntry GLWideExit GLWideExtent GLWideFill GLWideSize GLWideWidth GLXDirection GLXIncrement GLYDirection GWAAColorMask GWAAColorShift GWAAHalfPixel GWAALevel GWAAScanMask GWAAShift GWAETStart GWAETUsed GWBezierHeightSubdivisions GWBezierLineConversions GWBezierMonotonSubdivisions GWBezierOverflowSubdivisions GWBufferTop GWClearSpanBuffer GWClipMaxX GWClipMaxY GWClipMinX GWClipMinY GWColorTransform GWCountAddAETEntry GWCountChangeAETEntry GWCountDisplaySpan GWCountFinishTest GWCountInitializing GWCountMergeFill GWCountNextAETEntry GWCountNextFillEntry GWCountNextGETEntry GWCurrentY GWCurrentZ GWDestOffsetX GWDestOffsetY GWEdgeTransform GWFillMaxX GWFillMaxY GWFillMinX GWFillMinY GWFillOffsetX GWFillOffsetY GWGETStart GWGETUsed GWHasClipShapes GWHasColorTransform GWHasEdgeTransform GWHeaderSize GWLastExportedEdge GWLastExportedFill GWLastExportedLeftX GWLastExportedRightX GWMagicIndex GWMagicNumber GWMinimalSize GWNeedsFlush GWObjStart GWObjUsed GWPoint1 GWPoint2 GWPoint3 GWPoint4 GWPointListFirst GWSize GWSpanEnd GWSpanEndAA GWSpanSize GWSpanStart GWState GWStopReason GWTimeAddAETEntry GWTimeChangeAETEntry GWTimeDisplaySpan GWTimeFinishTest GWTimeInitializing GWTimeMergeFill GWTimeNextAETEntry GWTimeNextFillEntry GWTimeNextGETEntry'
  	poolDictionaries: ''
  	category: 'Balloon-Engine'!

Item was changed:
  ----- Method: BalloonEngineConstants class>>initPrimitiveConstants (in category 'pool definition') -----
  initPrimitiveConstants
  	"Initialize the primitive constants"
  
  	"Primitive type constants"
  	GEPrimitiveUnknown := 0.
  	GEPrimitiveEdgeMask := 16rFF.
  	GEPrimitiveFillMask := 16rFF00.
  	GEPrimitiveTypeMask := 16rFFFF.
  
  	"General state constants (Note: could be compressed later)"
  	GEObjectType := 0.				"Type of object"
  	GEObjectLength := 1.			"Length of object"
  	GEObjectIndex := 2.			"Index into external objects"
  	GEObjectUnused := 3.			"Currently unused"
  
+ 	"Primitive failure codes"
+ 	GEFAlreadyFailed := 100.
+ 
+ 	GEFEngineIsInteger := 101.
+ 	GEFEngineIsWords := 102.
+ 	GEFEngineTooSmall := 103.
+ 	GEFEngineStopped := 104.
+ 
+ 	GEFWorkBufferIsInteger := 105.
+ 	GEFWorkBufferIsPointers := 106.
+ 	GEFWorkBufferTooSmall := 107.
+ 	GEFWorkBufferBadMagic := 108.
+ 	GEFWorkBufferWrongSize := 109.
+ 	GEFWorkBufferStartWrong := 110.
+ 	GEFWorkTooBig := 111.
+ 
+ 	GEFEdgeDataTooSmall := 112.
+ 	GEFFillDataTooSmall := 113.
+ 	GEFClassMismatch := 114.
+ 	GEFSizeMismatch := 115.
+ 	GEFWrongState := 116.
+ 	GEFWrongFill := 117.
+ 	GEFWrongEdge := 118.
+ 
+ 	GEFEntityLoadFailed := 119.
+ 	GEFEntityCheckFailed := 120.
+ 	GEFBadPoint := 121.
+ 	GEFBitBltLoadFailed := 122.
+ 	GEFFormLoadFailed := 123!
- !



More information about the Squeak-dev mailing list