Cairo__DeviceType.st
author Jan Vrany <jan.vrany@labware.com>
Mon, 15 Jun 2020 15:16:56 +0100
changeset 90 b808c338d5c3
parent 88 9d51db2ba641
permissions -rw-r--r--
Fix `SimpleView >> redrawWithCairoBuffered:...` after an API change ...which happened a loong time ago but went unnoticed.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
88
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
     1
"
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
     2
stx:goodies/libcairo - Cairo graphics bindings for Smalltalk/X
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
     3
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
     4
Copyright (C) 2008-2019 Jan Vrany
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
     5
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
     6
This code is licensed under Creative Commons Attribution-NonCommercial License.
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
     7
For full text of the license, see file LICENSE.txt
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
     8
"
29
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     9
"{ Package: 'stx:goodies/libcairo' }"
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    10
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    11
"{ NameSpace: Cairo }"
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    12
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    13
SharedPool subclass:#DeviceType
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    14
	instanceVariableNames:''
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    15
	classVariableNames:'CAIRO_DEVICE_TYPE_DRM CAIRO_DEVICE_TYPE_GL
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    16
		CAIRO_DEVICE_TYPE_SCRIPT CAIRO_DEVICE_TYPE_XCB
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    17
		CAIRO_DEVICE_TYPE_XLIB CAIRO_DEVICE_TYPE_XML
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    18
		CAIRO_DEVICE_TYPE_COGL CAIRO_DEVICE_TYPE_WIN32
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    19
		CAIRO_DEVICE_TYPE_INVALID'
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    20
	poolDictionaries:''
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    21
	category:'Cairo-Constants'
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    22
!
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    23
88
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    24
!DeviceType class methodsFor:'documentation'!
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    25
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    26
copyright
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    27
"
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    28
stx:goodies/libcairo - Cairo graphics bindings for Smalltalk/X
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    29
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    30
Copyright (C) 2008-2019 Jan Vrany
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    31
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    32
This code is licensed under Creative Commons Attribution-NonCommercial License.
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    33
For full text of the license, see file LICENSE.txt
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    34
"
9d51db2ba641 Add copyright notice
Jan Vrany <jan.vrany@labware.com>
parents: 36
diff changeset
    35
! !
36
9b680e54aa94 Take a step back: separate Cairo's GraphicsContext (cairo_t) and Smalltalk/X's graphics context
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 29
diff changeset
    36
29
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    37
!DeviceType class methodsFor:'initialization'!
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    38
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    39
initialize
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    40
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    41
    CAIRO_DEVICE_TYPE_DRM := 0.
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    42
    CAIRO_DEVICE_TYPE_GL := 1.
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    43
    CAIRO_DEVICE_TYPE_SCRIPT := 2.
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    44
    CAIRO_DEVICE_TYPE_XCB := 3.
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    45
    CAIRO_DEVICE_TYPE_XLIB := 4.
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    46
    CAIRO_DEVICE_TYPE_XML := 5.
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    47
    CAIRO_DEVICE_TYPE_COGL := 6.
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    48
    CAIRO_DEVICE_TYPE_WIN32 := 7.
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    49
    CAIRO_DEVICE_TYPE_INVALID := -1.
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    50
! !
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    51
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    52
!DeviceType class methodsFor:'constants'!
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    53
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    54
CAIRO_DEVICE_TYPE_COGL
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    55
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    56
    ^CAIRO_DEVICE_TYPE_COGL
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    57
!
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    58
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    59
CAIRO_DEVICE_TYPE_DRM
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    60
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    61
    ^CAIRO_DEVICE_TYPE_DRM
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    62
!
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    63
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    64
CAIRO_DEVICE_TYPE_GL
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    65
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    66
    ^CAIRO_DEVICE_TYPE_GL
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    67
!
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    68
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    69
CAIRO_DEVICE_TYPE_INVALID
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    70
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    71
    ^CAIRO_DEVICE_TYPE_INVALID
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    72
!
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    73
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    74
CAIRO_DEVICE_TYPE_SCRIPT
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    75
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    76
    ^CAIRO_DEVICE_TYPE_SCRIPT
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    77
!
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    78
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    79
CAIRO_DEVICE_TYPE_WIN32
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    80
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    81
    ^CAIRO_DEVICE_TYPE_WIN32
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    82
!
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    83
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    84
CAIRO_DEVICE_TYPE_XCB
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    85
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    86
    ^CAIRO_DEVICE_TYPE_XCB
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    87
!
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    88
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    89
CAIRO_DEVICE_TYPE_XLIB
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    90
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    91
    ^CAIRO_DEVICE_TYPE_XLIB
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    92
!
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    93
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    94
CAIRO_DEVICE_TYPE_XML
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    95
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    96
    ^CAIRO_DEVICE_TYPE_XML
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    97
! !
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    98
36
9b680e54aa94 Take a step back: separate Cairo's GraphicsContext (cairo_t) and Smalltalk/X's graphics context
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 29
diff changeset
    99
!DeviceType class methodsFor:'documentation'!
9b680e54aa94 Take a step back: separate Cairo's GraphicsContext (cairo_t) and Smalltalk/X's graphics context
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 29
diff changeset
   100
9b680e54aa94 Take a step back: separate Cairo's GraphicsContext (cairo_t) and Smalltalk/X's graphics context
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 29
diff changeset
   101
version_HG
9b680e54aa94 Take a step back: separate Cairo's GraphicsContext (cairo_t) and Smalltalk/X's graphics context
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 29
diff changeset
   102
9b680e54aa94 Take a step back: separate Cairo's GraphicsContext (cairo_t) and Smalltalk/X's graphics context
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 29
diff changeset
   103
    ^ '$Changeset: <not expanded> $'
9b680e54aa94 Take a step back: separate Cairo's GraphicsContext (cairo_t) and Smalltalk/X's graphics context
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 29
diff changeset
   104
! !
9b680e54aa94 Take a step back: separate Cairo's GraphicsContext (cairo_t) and Smalltalk/X's graphics context
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 29
diff changeset
   105
29
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   106
6ba06265e543 Bindinge updated to recent Cairo version.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   107
DeviceType initialize!