Cairo__RectangleList.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Fri, 11 Jul 2008 08:49:27 +0000
changeset 5 65635e9ef3e8
parent 3 f4f599f2a1b5
child 6 c1f387b40e3a
permissions -rw-r--r--
added basic text rendering

"{ Package: 'stx:goodies/libcairo' }"

"{ NameSpace: Cairo }"

ExternalStructure subclass:#RectangleList
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'Cairo - C Types'
!


!RectangleList class methodsFor:'accessing'!

libraryName

	OperatingSystem isUNIXlike ifTrue:[^'libcairo.so'].

	OperatingSystem isMSWINDOWSlike ifTrue:[^'cairo.dll'].

	self error:'Library name for host OS is not known'

    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !

!RectangleList class methodsFor:'primitives'!

primDestroy: rectangle_list 

	<cdecl: void "cairo_rectangle_list_destroy" ( Cairo::RectangleList ) >
	self primitiveFailed

    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !

!RectangleList methodsFor:'accessing - primitives'!

primNumRectangles

	self doubleWordAt:1 + 8

    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!

primNumRectangles: value

	self doubleWordAt:1 + 8 put:value

    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!

primRectangles

	self doubleWordAt:1 + 4

    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!

primRectangles: value

	self doubleWordAt:1 + 4 put:value

    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!

primStatus

	self doubleWordAt:1 + 0

    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
!

primStatus: value

	self doubleWordAt:1 + 0 put:value

    "Modified: / 10-07-2008 / 23:05:54 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !

!RectangleList class methodsFor:'documentation'!

version
    ^'$Id$'
! !