Cairo__Pattern.st
changeset 43 1006839761af
parent 30 c8fe298c8cc7
child 63 054f0513ea65
--- a/Cairo__Pattern.st	Tue Feb 23 10:36:57 2016 +0000
+++ b/Cairo__Pattern.st	Tue Feb 23 16:58:27 2016 +0000
@@ -65,6 +65,36 @@
     ^0
 ! !
 
+!Pattern methodsFor:'accessing'!
+
+referenceCount
+    "Return value of reference counter"
+
+    ^ CPrimitives cairo_pattern_get_reference_count: self
+
+    "Modified (comment): / 23-02-2016 / 10:47:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+status
+    "Checks whether an error has previously occurred for this object.
+     See Cairo::Status pool for possible values."
+
+    ^ CPrimitives cairo_pattern_status: self
+
+    "Modified: / 23-02-2016 / 10:48:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!Pattern methodsFor:'private'!
+
+destroy
+    "Tell Cairo library to destroy the corresponding C object.
+     Remember that object is physically destroyed only if internal
+     refcounter goes to zero. However, after calling destroy,
+     this instance should be treated as invalid."
+
+    ^ self shouldImplement
+! !
+
 !Pattern class methodsFor:'documentation'!
 
 version