7 classVariableNames:'' |
7 classVariableNames:'' |
8 poolDictionaries:'' |
8 poolDictionaries:'' |
9 category:'Cairo - Objects' |
9 category:'Cairo - Objects' |
10 ! |
10 ! |
11 |
11 |
|
12 |
12 !PathData class methodsFor:'accessing'! |
13 !PathData class methodsFor:'accessing'! |
13 |
14 |
14 libraryName |
15 libraryName |
15 |
16 |
16 OperatingSystem isUNIXlike ifTrue:[^'libcairo.so']. |
17 OperatingSystem isUNIXlike ifTrue:[^'libcairo.so.2']. |
17 |
18 |
18 OperatingSystem isMSWINDOWSlike ifTrue:[^'cairo.dll']. |
19 OperatingSystem isMSWINDOWSlike ifTrue:[^'cairo.dll']. |
19 |
20 |
20 self error:'Library name for host OS is not known' |
21 self error:'Library name for host OS is not known' |
21 |
22 |
22 "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
23 "Modified: / 10-09-2008 / 18:19:54 / Jan Vrany <vranyj1@fel.cvut.cz>" |
23 ! |
24 ! |
24 |
25 |
25 structSize |
26 structSize |
26 |
27 |
27 ^128 |
28 ^128 |
28 |
29 |
29 "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
30 "Modified: / 10-09-2008 / 18:19:54 / Jan Vrany <vranyj1@fel.cvut.cz>" |
30 ! ! |
31 ! ! |
31 |
32 |
32 !PathData methodsFor:'accessing'! |
33 !PathData methodsFor:'accessing'! |
33 |
34 |
34 header |
35 header |
35 |
36 |
36 ^self at:1 + 0 |
37 ^self at:1 + 0 |
37 |
38 |
38 "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
39 "Modified: / 10-09-2008 / 18:19:54 / Jan Vrany <vranyj1@fel.cvut.cz>" |
39 ! |
40 ! |
40 |
41 |
41 header: value |
42 header: value |
42 |
43 |
43 self at:1 + 0 put:value |
44 self at:1 + 0 put:value |
44 |
45 |
45 "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
46 "Modified: / 10-09-2008 / 18:19:54 / Jan Vrany <vranyj1@fel.cvut.cz>" |
46 ! |
47 ! |
47 |
48 |
48 point |
49 point |
49 |
50 |
50 ^self at:1 + 0 |
51 ^self at:1 + 0 |
51 |
52 |
52 "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
53 "Modified: / 10-09-2008 / 18:19:54 / Jan Vrany <vranyj1@fel.cvut.cz>" |
53 ! |
54 ! |
54 |
55 |
55 point: value |
56 point: value |
56 |
57 |
57 self at:1 + 0 put:value |
58 self at:1 + 0 put:value |
58 |
59 |
59 "Modified: / 09-09-2008 / 21:57:43 / Jan Vrany <vranyj1@fel.cvut.cz>" |
60 "Modified: / 10-09-2008 / 18:19:54 / Jan Vrany <vranyj1@fel.cvut.cz>" |
60 ! ! |
61 ! ! |
61 |
62 |
|
63 !PathData class methodsFor:'documentation'! |
|
64 |
|
65 version |
|
66 ^'$Id$' |
|
67 ! ! |