--- a/Cairo__TextExtents.st Thu Jul 10 20:58:32 2008 +0000
+++ b/Cairo__TextExtents.st Thu Jul 10 21:10:31 2008 +0000
@@ -19,7 +19,7 @@
self error:'Library name for host OS is not known'
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !
!TextExtents methodsFor:'accessing - primitives'!
@@ -28,83 +28,83 @@
self doubleAt:1 + 24
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
primHeight: value
self doubleAt:1 + 24 put:value
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
primWidth
self doubleAt:1 + 16
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
primWidth: value
self doubleAt:1 + 16 put:value
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
primXAdvance
self doubleAt:1 + 32
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
primXAdvance: value
self doubleAt:1 + 32 put:value
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
primXBearing
self doubleAt:1 + 0
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
primXBearing: value
self doubleAt:1 + 0 put:value
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
primYAdvance
self doubleAt:1 + 40
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
primYAdvance: value
self doubleAt:1 + 40 put:value
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
primYBearing
self doubleAt:1 + 8
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!
primYBearing: value
self doubleAt:1 + 8 put:value
- "Modified: / 10-07-2008 / 11:04:11 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !