author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Fri, 09 Jan 2015 16:15:59 +0000 | |
changeset 34 | 97705b5a9411 |
parent 29 | 6ba06265e543 |
child 40 | 28dfc583beb5 |
permissions | -rw-r--r-- |
1 | 1 |
"{ Package: 'stx:goodies/libcairo' }" |
2 |
||
3 |
"{ NameSpace: Cairo }" |
|
4 |
||
5 |
SharedPool subclass:#FontSlant |
|
6 |
instanceVariableNames:'' |
|
29
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
7 |
classVariableNames:'CAIRO_FONT_SLANT_NORMAL CAIRO_FONT_SLANT_ITALIC |
34
97705b5a9411
Use Cairo's toy text API for text rendering.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
29
diff
changeset
|
8 |
CAIRO_FONT_SLANT_OBLIQUE SymbolicFontSlantToCairoFontSlantMap' |
1 | 9 |
poolDictionaries:'' |
12 | 10 |
category:'Cairo-Constants' |
1 | 11 |
! |
12 |
||
13 |
!FontSlant class methodsFor:'initialization'! |
|
14 |
||
15 |
initialize |
|
16 |
||
29
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
17 |
CAIRO_FONT_SLANT_NORMAL := 0. |
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
18 |
CAIRO_FONT_SLANT_ITALIC := 1. |
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
19 |
CAIRO_FONT_SLANT_OBLIQUE := 2. |
34
97705b5a9411
Use Cairo's toy text API for text rendering.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
29
diff
changeset
|
20 |
|
97705b5a9411
Use Cairo's toy text API for text rendering.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
29
diff
changeset
|
21 |
SymbolicFontSlantToCairoFontSlantMap := Dictionary new. |
97705b5a9411
Use Cairo's toy text API for text rendering.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
29
diff
changeset
|
22 |
SymbolicFontSlantToCairoFontSlantMap at: 'roman' put: CAIRO_FONT_SLANT_NORMAL. |
97705b5a9411
Use Cairo's toy text API for text rendering.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
29
diff
changeset
|
23 |
SymbolicFontSlantToCairoFontSlantMap at: 'normal' put: CAIRO_FONT_SLANT_NORMAL. |
97705b5a9411
Use Cairo's toy text API for text rendering.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
29
diff
changeset
|
24 |
SymbolicFontSlantToCairoFontSlantMap at: 'italic' put: CAIRO_FONT_SLANT_ITALIC. |
97705b5a9411
Use Cairo's toy text API for text rendering.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
29
diff
changeset
|
25 |
SymbolicFontSlantToCairoFontSlantMap at: 'obligue' put: CAIRO_FONT_SLANT_OBLIQUE. |
97705b5a9411
Use Cairo's toy text API for text rendering.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
29
diff
changeset
|
26 |
|
97705b5a9411
Use Cairo's toy text API for text rendering.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
29
diff
changeset
|
27 |
"Modified: / 09-01-2015 / 15:12:05 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1 | 28 |
! ! |
29 |
||
30 |
!FontSlant class methodsFor:'constants'! |
|
31 |
||
29
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
32 |
CAIRO_FONT_SLANT_ITALIC |
12 | 33 |
|
29
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
34 |
^CAIRO_FONT_SLANT_ITALIC |
1 | 35 |
! |
36 |
||
29
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
37 |
CAIRO_FONT_SLANT_NORMAL |
1 | 38 |
|
29
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
39 |
^CAIRO_FONT_SLANT_NORMAL |
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
40 |
! |
12 | 41 |
|
29
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
42 |
CAIRO_FONT_SLANT_OBLIQUE |
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
43 |
|
6ba06265e543
Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
23
diff
changeset
|
44 |
^CAIRO_FONT_SLANT_OBLIQUE |
1 | 45 |
! ! |
46 |
||
47 |
||
48 |
FontSlant initialize! |