author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Tue, 09 Sep 2008 21:28:47 +0000 | |
changeset 6 | c1f387b40e3a |
parent 5 | 65635e9ef3e8 |
child 7 | 392289f92fab |
permissions | -rw-r--r-- |
1 | 1 |
"{ Package: 'stx:goodies/libcairo' }" |
2 |
||
3 |
"{ NameSpace: Cairo }" |
|
4 |
||
5 |
ExternalStructure subclass:#Path |
|
6 |
instanceVariableNames:'' |
|
7 |
classVariableNames:'' |
|
8 |
poolDictionaries:'' |
|
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
9 |
category:'Cairo - Objects' |
1 | 10 |
! |
11 |
||
12 |
!Path class methodsFor:'accessing'! |
|
13 |
||
14 |
libraryName |
|
15 |
||
16 |
OperatingSystem isUNIXlike ifTrue:[^'libcairo.so']. |
|
17 |
||
18 |
OperatingSystem isMSWINDOWSlike ifTrue:[^'cairo.dll']. |
|
19 |
||
20 |
self error:'Library name for host OS is not known' |
|
21 |
||
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
22 |
"Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
23 |
! |
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
24 |
|
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
25 |
structSize |
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
26 |
|
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
27 |
^96 |
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
28 |
|
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
29 |
"Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1 | 30 |
! ! |
31 |
||
32 |
!Path class methodsFor:'primitives'! |
|
33 |
||
34 |
primDestroy: path |
|
35 |
||
36 |
<cdecl: void "cairo_path_destroy" ( Cairo::Path ) > |
|
37 |
self primitiveFailed |
|
38 |
||
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
39 |
"Modified: / 09-09-2008 / 21:57:45 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1 | 40 |
! ! |
41 |
||
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
42 |
!Path methodsFor:'accessing'! |
1 | 43 |
|
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
44 |
data |
1 | 45 |
|
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
46 |
^self doubleWordAt:1 + 4 |
1 | 47 |
|
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
48 |
"Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1 | 49 |
! |
50 |
||
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
51 |
data: value |
1 | 52 |
|
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
53 |
self pointerAt:1 + 4 put:value |
1 | 54 |
|
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
55 |
"Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1 | 56 |
! |
57 |
||
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
58 |
numData |
1 | 59 |
|
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
60 |
^self doubleWordAt:1 + 8 |
1 | 61 |
|
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
62 |
"Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1 | 63 |
! |
64 |
||
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
65 |
numData: value |
1 | 66 |
|
67 |
self doubleWordAt:1 + 8 put:value |
|
68 |
||
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
69 |
"Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1 | 70 |
! |
71 |
||
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
72 |
status |
1 | 73 |
|
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
74 |
^self doubleWordAt:1 + 0 |
1 | 75 |
|
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
76 |
"Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1 | 77 |
! |
78 |
||
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
79 |
status: value |
1 | 80 |
|
81 |
self doubleWordAt:1 + 0 put:value |
|
82 |
||
6
c1f387b40e3a
regenerated using newer version of CFace
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
5
diff
changeset
|
83 |
"Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1 | 84 |
! ! |
85 |