--- a/Cairo__Path.st	Fri Jul 11 08:49:27 2008 +0000
+++ b/Cairo__Path.st	Tue Sep 09 21:28:47 2008 +0000
@@ -6,10 +6,9 @@
 	instanceVariableNames:''
 	classVariableNames:''
 	poolDictionaries:''
-	category:'Cairo - C Types'
+	category:'Cairo - Objects'
 !
 
-
 !Path class methodsFor:'accessing'!
 
 libraryName
@@ -20,7 +19,14 @@
 
 	self error:'Library name for host OS is not known'
 
-    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+structSize
+
+	^96
+
+    "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
 !Path class methodsFor:'primitives'!
@@ -30,55 +36,50 @@
 	<cdecl: void "cairo_path_destroy" ( Cairo::Path ) >
 	self primitiveFailed
 
-    "Modified: / 10-07-2008 / 23:05:55 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 09-09-2008 / 21:57:45 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
-!Path methodsFor:'accessing - primitives'!
+!Path methodsFor:'accessing'!
 
-primData
+data
 
-	self doubleWordAt:1 + 4
+	^self doubleWordAt:1 + 4
 
-    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
-primData: value
+data: value
 
-	self doubleWordAt:1 + 4 put:value
+	self pointerAt:1 + 4 put:value
 
-    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
-primNumData
+numData
 
-	self doubleWordAt:1 + 8
+	^self doubleWordAt:1 + 8
 
-    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
-primNumData: value
+numData: value
 
 	self doubleWordAt:1 + 8 put:value
 
-    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
-primStatus
+status
 
-	self doubleWordAt:1 + 0
+	^self doubleWordAt:1 + 0
 
-    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>"
 !
 
-primStatus: value
+status: value
 
 	self doubleWordAt:1 + 0 put:value
 
-    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
-!Path class methodsFor:'documentation'!
-
-version
-    ^'$Id$'
-! !