Ticket #17: circle-solid.dpatch

2 patches for repository http://code.ouroborus.net/gloss/gloss-head/:

Thu Aug  4 22:40:49 MDT 2011  Chris Smith <cdsmith@gmail.com>
  * Add circleSolid

Sun Aug  7 20:41:48 MDT 2011  Chris Smith <cdsmith@gmail.com>
  * add circleSolid to export list

New patches:

[Add circleSolid
Chris Smith <cdsmith@gmail.com>**20110805044049
 Ignore-this: 1d64f38f77e704a85eabdf21afcac0cb
] hunk ./library/Graphics/Gloss/Data/Picture.hs 173
 rectangleUpperSolid sizeX sizeY
        = Polygon  $ rectangleUpperPath sizeX sizeY
 
+-- | A solid circle with the given radius.
+circleSolid :: Float -> Picture
+circleSolid r = thickCircle (r/2) r
+
+
[add circleSolid to export list
Chris Smith <cdsmith@gmail.com>**20110808024148
 Ignore-this: 62b8f994bd9f7a85fee0eb0524e84cb8
] hunk ./library/Graphics/Gloss/Data/Picture.hs 14
        , color, translate, rotate, scale
        , pictures
 
-       -- * Line loops
+       -- * Miscellaneous
        , lineLoop
hunk ./library/Graphics/Gloss/Data/Picture.hs 16
+       , circleSolid
        
        -- * Rectangles
        , rectanglePath,        rectangleWire,          rectangleSolid

Context:

[TAG Release 1.3.3.1
Ben Lippmeier <benl@ouroborus.net>**20110803064127
 Ignore-this: 66231bcec657fe6c21bb62dfe0dad8bf
] 
Patch bundle hash:
90b84ff8a8929e4308ec367d71a498c8ba00cf25