--- a/Cairo__RectangleList.st	Thu Apr 23 15:35:17 2009 +0000
+++ b/Cairo__RectangleList.st	Wed May 30 20:06:35 2012 +0000
@@ -19,15 +19,11 @@
 	OperatingSystem isMSWINDOWSlike ifTrue:[^'cairo.dll'].
 
 	self error:'Library name for host OS is not known'
-
-    "Modified: / 10-09-2008 / 18:19:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
 structSize
 
 	^96
-
-    "Modified: / 10-09-2008 / 18:19:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
 !RectangleList class methodsFor:'primitives'!
@@ -38,54 +34,52 @@
 	self primitiveFailed
 
     "Modified: / 10-09-2008 / 18:19:55 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+primRectangleListDestroy: rectangle_list 
+
+	<cdecl: void "cairo_rectangle_list_destroy" ( Cairo::RectangleList ) >
+	self primitiveFailed
 ! !
 
 !RectangleList methodsFor:'accessing'!
 
 numRectangles
 
-	^self doubleWordAt:1 + 8
-
-    "Modified: / 10-09-2008 / 18:19:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
+	^self longAt:1 + 8
 !
 
 numRectangles: value
 
-	self doubleWordAt:1 + 8 put:value
-
-    "Modified: / 10-09-2008 / 18:19:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
+	self longAt:1 + 8 put:value
 !
 
 rectangles
 
-	^self doubleWordAt:1 + 4
-
-    "Modified: / 10-09-2008 / 18:19:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
+	^self pointerAt:1 + 4
 !
 
 rectangles: value
 
 	self pointerAt:1 + 4 put:value
-
-    "Modified: / 10-09-2008 / 18:19:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
 status
 
 	^self doubleWordAt:1 + 0
-
-    "Modified: / 10-09-2008 / 18:19:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
 status: value
 
 	self doubleWordAt:1 + 0 put:value
-
-    "Modified: / 10-09-2008 / 18:19:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
 !RectangleList class methodsFor:'documentation'!
 
 version
     ^'$Id$'
+!
+
+version_SVN
+    ^ '$Id::                                                                                                                        $'
 ! !