tccasm: Detect (but ignore) .ident directive

tcc is now able to compile many asm files generated by gcc

--
By by ... Detlef

2 files changed, 19 insertions, 0 deletions

diff --git a/tccasm.c b/tccasm.c
index 3097876..b5b2fff 100644
--- a/tccasm.c
+++ b/tccasm.c
@@ -555,6 +555,24 @@ static void asm_parse_directive(TCCState *s1)
             next();
         }
         break;
+    case TOK_ASM_ident:
+        {
+            char ident[256];
+
+            ident[0] = '\0';
+            next();
+
+            if (tok == TOK_STR)
+                pstrcat(ident, sizeof(ident), tokc.cstr->data);
+            else
+                pstrcat(ident, sizeof(ident), get_tok_str(tok, NULL));
+
+            if (s1->warn_unsupported)
+                warning("ignoring .ident %s", ident);
+
+            next();
+        }
+        break;
     case TOK_ASM_size:
         { 
             Sym *sym;
diff --git a/tcctok.h b/tcctok.h
index 7846b4e..02ac767 100644
--- a/tcctok.h
+++ b/tcctok.h
@@ -252,6 +252,7 @@
  DEF_ASM(file)
  DEF_ASM(globl)
  DEF_ASM(global)
+ DEF_ASM(ident)
  DEF_ASM(size)
  DEF_ASM(type)
  DEF_ASM(text)