X-Git-Url: http://git.draconx.ca/gitweb/gob-dx.git/blobdiff_plain/b17287deb56775a49030d738d8c8c0e9cd15f9fe..3b10bbd3a88d6e16146414d91d06bb2f36347bfc:/src/checks.c

diff --git a/src/checks.c b/src/checks.c
index 73b10d8..80602d1 100644
--- a/src/checks.c
+++ b/src/checks.c
@@ -396,3 +396,35 @@ count_protecteds(Class *c)
 	}
 	return num;
 }
+
+int
+count_destructors(Class *c)
+{
+	int num = 0;
+	GList *l;
+	for(l=c->nodes;l;l=g_list_next(l)) {
+		Node *n = l->data;
+		if(n->type == VARIABLE_NODE) {
+			Variable *v = (Variable *)n;
+			if(v->destructor)
+				num++;
+		}
+	}
+	return num;
+}
+
+int
+count_initializers(Class *c)
+{
+	int num = 0;
+	GList *l;
+	for(l=c->nodes;l;l=g_list_next(l)) {
+		Node *n = l->data;
+		if(n->type == VARIABLE_NODE) {
+			Variable *v = (Variable *)n;
+			if(v->initializer)
+				num++;
+		}
+	}
+	return num;
+}