--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Cairo__Device.st	Wed May 30 20:06:35 2012 +0000
@@ -0,0 +1,101 @@
+"{ Package: 'stx:goodies/libcairo' }"
+
+"{ NameSpace: Cairo }"
+
+ExternalStructure subclass:#Device
+	instanceVariableNames:''
+	classVariableNames:''
+	poolDictionaries:''
+	category:'Cairo - C Types'
+!
+
+
+!Device class methodsFor:'accessing'!
+
+libraryName
+
+	OperatingSystem isUNIXlike ifTrue:[^'libcairo.so.2'].
+
+	OperatingSystem isMSWINDOWSlike ifTrue:[^'cairo.dll'].
+
+	self error:'Library name for host OS is not known'
+!
+
+structSize
+
+	^0
+! !
+
+!Device class methodsFor:'primitives'!
+
+primDeviceAcquire: device 
+
+	<cdecl: int32 "cairo_device_acquire" ( Cairo::Device ) >
+	self primitiveFailed
+!
+
+primDeviceDestroy: device 
+
+	<cdecl: void "cairo_device_destroy" ( Cairo::Device ) >
+	self primitiveFailed
+!
+
+primDeviceFinish: device 
+
+	<cdecl: void "cairo_device_finish" ( Cairo::Device ) >
+	self primitiveFailed
+!
+
+primDeviceFlush: device 
+
+	<cdecl: void "cairo_device_flush" ( Cairo::Device ) >
+	self primitiveFailed
+!
+
+primDeviceGetReferenceCount: device 
+
+	<cdecl: uint32 "cairo_device_get_reference_count" ( Cairo::Device ) >
+	self primitiveFailed
+!
+
+primDeviceGetType: device 
+
+	<cdecl: int32 "cairo_device_get_type" ( Cairo::Device ) >
+	self primitiveFailed
+!
+
+primDeviceGetUserData: device key: key 
+
+	<cdecl: voidPointer "cairo_device_get_user_data" ( Cairo::Device Cairo::UserDataKey ) >
+	self primitiveFailed
+!
+
+primDeviceReference: device 
+
+	<cdecl: Cairo::Device "cairo_device_reference" ( Cairo::Device ) >
+	self primitiveFailed
+!
+
+primDeviceRelease: device 
+
+	<cdecl: void "cairo_device_release" ( Cairo::Device ) >
+	self primitiveFailed
+!
+
+primDeviceSetUserData: device key: key userData: user_data destroy: destroy 
+
+	<cdecl: int32 "cairo_device_set_user_data" ( Cairo::Device Cairo::UserDataKey voidPointer pointer ) >
+	self primitiveFailed
+!
+
+primDeviceStatus: device 
+
+	<cdecl: int32 "cairo_device_status" ( Cairo::Device ) >
+	self primitiveFailed
+! !
+
+!Device class methodsFor:'documentation'!
+
+version_SVN
+    ^ '$Id::                                                                                                                        $'
+! !