From 1e423b9645c0390ece6b2b458d4cad776bf98493 Mon Sep 17 00:00:00 2001
From: Bill Currie <bill@taniwha.org>
Date: Thu, 13 Mar 2003 19:16:45 +0000
Subject: [PATCH] make certain classes get referenced when inheriting from them

---
 tools/qfcc/source/class.c | 50 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 50 insertions(+)

diff --git a/tools/qfcc/source/class.c b/tools/qfcc/source/class.c
index e8b4aede4..185f867c5 100644
--- a/tools/qfcc/source/class.c
+++ b/tools/qfcc/source/class.c
@@ -229,6 +229,51 @@ class_begin (class_type_t *class_type)
 	}
 }
 
+static void
+emit_class_ref (const char *class_name)
+{
+	def_t      *def;
+	def_t      *ref;
+
+	def = get_def (&type_pointer, va (".obj_class_ref_%s", class_name),
+				   pr.scope, st_static);
+	if (def->initialized)
+		return;
+	def->initialized = def->constant = 1;
+	ref = get_def (&type_integer, va (".obj_class_name_%s", class_name),
+				   pr.scope, st_extern);
+	if (!ref->external)
+		G_INT (def->ofs) = ref->ofs;
+	reloc_def_def (ref, def->ofs);
+}
+
+static void
+emit_class_name (const char *class_name)
+{
+	def_t      *def;
+
+	def = get_def (&type_integer, va (".obj_class_name_%s", class_name),
+				   pr.scope, st_global);
+	if (def->initialized)
+		return;
+	def->initialized = def->constant = 1;
+	G_INT (def->ofs) = 0;
+}
+
+static void
+emit_category_name (const char *class_name, const char *category_name)
+{
+	def_t      *def;
+
+	def = get_def (&type_integer,
+				   va (".obj_category_name_%s_%s", class_name, category_name),
+				   pr.scope, st_global);
+	if (def->initialized)
+		return;
+	def->initialized = def->constant = 1;
+	G_INT (def->ofs) = 0;
+}
+
 void
 class_finish (class_type_t *class_type)
 {
@@ -246,6 +291,8 @@ class_finish (class_type_t *class_type)
 				  emit_methods (category->methods, va ("%s_%s",
 													   class->name,
 													   category->name), 0));
+		emit_class_ref (class->name);
+		emit_category_name (class->name, category->name);
 	} else {
 		pr_class_t *meta;
 		pr_class_t *cls;
@@ -262,6 +309,9 @@ class_finish (class_type_t *class_type)
 		EMIT_DEF (cls->ivars, emit_struct (class->ivars, class->name));
 		EMIT_DEF (cls->methods, emit_methods (class->methods,
 											  class->name, 1));
+		if (class->super_class)
+			emit_class_ref (class->super_class->name);
+		emit_class_name (class->name);
 	}
 }