--- a/Cairo__Glyph.st	Fri Jul 11 08:49:27 2008 +0000
+++ b/Cairo__Glyph.st	Tue Sep 09 21:28:47 2008 +0000
@@ -6,10 +6,9 @@
 	instanceVariableNames:''
 	classVariableNames:''
 	poolDictionaries:''
-	category:'Cairo - C Types'
+	category:'Cairo - Objects'
 !
 
-
 !Glyph class methodsFor:'accessing'!
 
 libraryName
@@ -20,48 +19,50 @@
 
 	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
+
+	^160
+
+    "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
-!Glyph methodsFor:'accessing - primitives'!
+!Glyph methodsFor:'accessing'!
 
-primIndex
+index
 
-	self longAt:1 + 0
+	^self longAt: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>"
 !
 
-primX
+x
 
-	self doubleAt:1 + 4
+	^self doubleAt: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>"
 !
 
-primX: value
+x: value
 
 	self doubleAt: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>"
 !
 
-primY
+y
 
-	self doubleAt:1 + 12
+	^self doubleAt:1 + 12
 
-    "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>"
 !
 
-primY: value
+y: value
 
 	self doubleAt:1 + 12 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>"
 ! !
 
-!Glyph class methodsFor:'documentation'!
-
-version
-    ^'$Id$'
-! !