X-Git-Url: https://git.draconx.ca/gitweb/gob-dx.git/blobdiff_plain/a8ea1a669f332b0ed29c6271896476f59f357533..refs/tags/v2.0.13:/src/treefuncs.c

diff --git a/src/treefuncs.c b/src/treefuncs.c
index 6c2ca40..c385bc8 100644
--- a/src/treefuncs.c
+++ b/src/treefuncs.c
@@ -105,6 +105,7 @@ enum {
 	QUARK_interfaces_STEAL,
 	QUARK_nodes,
 	QUARK_nodes_STEAL,
+	QUARK_abstract,
 	QUARK_name,
 	QUARK_name_STEAL,
 	QUARK_pointer,
@@ -212,6 +213,7 @@ ensure_quarks (void)
 	g_hash_table_insert (quark_ht, "interfaces:steal", GINT_TO_POINTER (QUARK_interfaces_STEAL));
 	g_hash_table_insert (quark_ht, "nodes", GINT_TO_POINTER (QUARK_nodes));
 	g_hash_table_insert (quark_ht, "nodes:steal", GINT_TO_POINTER (QUARK_nodes_STEAL));
+	g_hash_table_insert (quark_ht, "abstract", GINT_TO_POINTER (QUARK_abstract));
 	g_hash_table_insert (quark_ht, "name", GINT_TO_POINTER (QUARK_name));
 	g_hash_table_insert (quark_ht, "name:steal", GINT_TO_POINTER (QUARK_name_STEAL));
 	g_hash_table_insert (quark_ht, "pointer", GINT_TO_POINTER (QUARK_pointer));
@@ -360,6 +362,7 @@ copy_class (Class * self)
 	new->chunk_size = g_strdup (self->chunk_size);
 	new->interfaces = g_list_copy (self->interfaces); COPY_LIST_VALS(new->interfaces, g_strdup);
 	new->nodes = node_list_copy (self->nodes);
+	new->abstract = self->abstract;
 	return new;
 }
 
@@ -947,6 +950,11 @@ setv_class (Class * self, va_list __ap)
 			self->nodes = nodes;
 			break;
 		}
+		case QUARK_abstract: {
+			gboolean abstract = va_arg (__ap, gboolean);
+			self->abstract = abstract;
+			break;
+		}
 		default:
 			g_warning ("Argument named 'Class::%s' does not exist", arg);
 			break;