From: Fred Fish <fnf@specifix.com>
Date: Wed, 2 Dec 1992 01:10:49 +0000 (+0000)
Subject: 	* dwarfread.c (CHILL_PRODUCER):  Add producer string for
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=93bb6e655c378449e33b2378252e4f44d4bdb478;p=binutils-gdb.git

	* dwarfread.c (CHILL_PRODUCER):  Add producer string for
	GNU chill.
	* dwarfread.c (handle_producer):  Test CHILL_PRODUCER as well
	as GCC_PRODUCER and GPLUS_PRODUCER.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index e3bad5aa947..0dc5111ee90 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,12 @@
+	**** start-sanitize-chill ****
+Tue Dec  1 17:07:31 1992  Fred Fish  (fnf@cygnus.com)
+
+	* dwarfread.c (CHILL_PRODUCER):  Add producer string for
+	GNU chill.
+	* dwarfread.c (handle_producer):  Test CHILL_PRODUCER as well
+	as GCC_PRODUCER and GPLUS_PRODUCER.
+	**** end-sanitize-chill ****
+
 Mon Nov 30 18:46:58 1992  Stu Grossman  (grossman at cygnus.com)
 
 	* remote-udi.c (udi_wait):  Don't stop if TIP says that remote is
diff --git a/gdb/dwarfread.c b/gdb/dwarfread.c
index 60360e45985..ef5404524cb 100644
--- a/gdb/dwarfread.c
+++ b/gdb/dwarfread.c
@@ -92,6 +92,12 @@ typedef unsigned int DIE_REF;	/* Reference to a DIE */
 #define CFRONT_PRODUCER "CFRONT "	/* A wild a** guess... */
 #endif
 
+/* start-sanitize-chill */
+#ifndef CHILL_PRODUCER
+#define CHILL_PRODUCER "GNU Chill "
+#endif
+/* end-sanitize-chill */
+
 #define STREQ(a,b)		(strcmp(a,b)==0)
 #define STREQN(a,b,n)		(strncmp(a,b,n)==0)
 
@@ -1678,6 +1684,9 @@ handle_producer (producer)
 
   processing_gcc_compilation =
     STREQN (producer, GPLUS_PRODUCER, strlen (GPLUS_PRODUCER))
+      /* start-sanitize-chill */
+      || STREQN (producer, CHILL_PRODUCER, strlen (CHILL_PRODUCER))
+      /* end-sanitize-chill */
       || STREQN (producer, GCC_PRODUCER, strlen (GCC_PRODUCER));
 
   /* Select a demangling style if we can identify the producer and if