From d8c63eaf97ba030e6affcfa1c779e1900c8de846 Mon Sep 17 00:00:00 2001
From: David Schleef <ds@schleef.org>
Date: Wed, 29 Oct 2003 05:10:53 +0000
Subject: [PATCH] check for old typefinding code

Original commit message from CVS:
check for old typefinding code
---
 tests/old/testsuite/gst-lint | 12 ++++++++++++
 testsuite/gst-lint           | 12 ++++++++++++
 2 files changed, 24 insertions(+)

diff --git a/tests/old/testsuite/gst-lint b/tests/old/testsuite/gst-lint
index 37f87b0a1..3d8a122f4 100755
--- a/tests/old/testsuite/gst-lint
+++ b/tests/old/testsuite/gst-lint
@@ -35,6 +35,7 @@ sub check_deprecated();
 sub check_config_h();
 sub check_varargs_functions();
 sub check_debugging();
+sub check_old_typefind();
 
 sub m_check_plugindir();
 
@@ -64,6 +65,7 @@ foreach $filename (<FIND>) {
 	check_varargs_functions();
 	check_debugging();
 	check_bad_includes();
+	check_old_typefind();
 }
 
 open FIND, "find . -name \"Makefile.am\" -print|";
@@ -329,3 +331,13 @@ sub m_check_plugindir()
 	}
 }
 
+#
+# check for old typefinding code
+#
+sub check_old_typefind()
+{
+	if (grep { /GstTypeDefinition/ || /GstTypeFactory/ } @lines) {
+		print "E: old typefind interface has been removed\n"
+	}
+}
+
diff --git a/testsuite/gst-lint b/testsuite/gst-lint
index 37f87b0a1..3d8a122f4 100755
--- a/testsuite/gst-lint
+++ b/testsuite/gst-lint
@@ -35,6 +35,7 @@ sub check_deprecated();
 sub check_config_h();
 sub check_varargs_functions();
 sub check_debugging();
+sub check_old_typefind();
 
 sub m_check_plugindir();
 
@@ -64,6 +65,7 @@ foreach $filename (<FIND>) {
 	check_varargs_functions();
 	check_debugging();
 	check_bad_includes();
+	check_old_typefind();
 }
 
 open FIND, "find . -name \"Makefile.am\" -print|";
@@ -329,3 +331,13 @@ sub m_check_plugindir()
 	}
 }
 
+#
+# check for old typefinding code
+#
+sub check_old_typefind()
+{
+	if (grep { /GstTypeDefinition/ || /GstTypeFactory/ } @lines) {
+		print "E: old typefind interface has been removed\n"
+	}
+}
+
-- 
2.34.1