The Trunk: Graphics-ul.154.mcz

Levente Uzonyi uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-ul.154.mcz

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

Name: Graphics-ul.154
Author: ul
Time: 15 November 2010, 10:03:54.643 am
UUID: 884952be-ab72-324d-ac95-e5f8ee4edcbe
Ancestors: Graphics-ul.153

- get rid of the last underscore assignments

=============== Diff against Graphics-ul.153 ===============

Item was changed:
  ----- Method: XBMReadWriter>>readHeader (in category 'private') -----
  readHeader
  "Set width and height, and position stream at start of bytes"
  | number setwidth setheight fieldName |
  setwidth := setheight := false.
  [((stream atEnd) or: [setwidth and: [setheight]])]
  whileFalse: [
    self skipCComments.
  (stream nextMatchAll: '#define ') ifFalse: [^ false].
  (stream skipTo: $_) ifFalse: [^ false].
  fieldName := String streamContents:
  [:source |
  [(stream atEnd) or: [ stream peek isSeparator ]]
  whileFalse: [ source nextPut: stream next]].
    (fieldName = 'width') ifTrue: [
  stream skipSeparators.
  number := Integer readFrom: stream.
+ (number > 0) ifTrue: [setwidth := true].
- (number > 0) ifTrue: [setwidth _true].
    width := number.].
  (fieldName = 'height') ifTrue: [
  stream skipSeparators.
  number := Integer readFrom: stream.
  (number > 0) ifTrue: [setheight := true].
  height := number.
  ].
  ].
  (setwidth & setheight) ifFalse: [^ false].
  ^ stream skipTo: ${
  !