From 3c058ff1e7fbb4f3a14f30d194e5a0679062a907 Mon Sep 17 00:00:00 2001
From: Richard Kenner <kenner@gcc.gnu.org>
Date: Fri, 13 Jan 1995 17:54:35 -0500
Subject: [PATCH] (ASM_FILE_START): New macro.

From-SVN: r8740
---
 gcc/config/i386/isc.h | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/gcc/config/i386/isc.h b/gcc/config/i386/isc.h
index 16f7142bbfd..72a07fe49a9 100644
--- a/gcc/config/i386/isc.h
+++ b/gcc/config/i386/isc.h
@@ -60,3 +60,25 @@
    80-bit XFmode insns, so don't generate them.  */
 #undef LONG_DOUBLE_TYPE_SIZE
 #define LONG_DOUBLE_TYPE_SIZE 64
+
+/* The ISC assembler does not like a .file directive with a name
+   longer than 14 characters.  Truncating it will not permit
+   debugging to work properly, but at least we won't get an error
+   message.  */
+
+#undef ASM_FILE_START
+#define ASM_FILE_START(FILE)                     \
+  do {                                           \
+   char c;                                       \
+   int max = 0;                                  \
+   char *string = dump_base_name;                \
+                                                 \
+    fputs ("\t.file\t\"", FILE);				 \
+                                                 \
+    while ((c = *string++) != 0 && max++ < 14) { \
+       if (c == '\"' || c == '\\')               \
+         putc ('\\', FILE);                      \
+       putc (c, FILE);                           \
+    }                                            \
+    fputs ("\"\n", FILE);                        \
+  } while (0)