tccasm: Detect (but ignore) .size directive

--
By by ... Detlef

1 files changed, 21 insertions, 0 deletions

diff --git a/tccasm.c b/tccasm.c
index 17c4e4b..3097876 100644
--- a/tccasm.c
+++ b/tccasm.c
@@ -555,6 +555,27 @@ static void asm_parse_directive(TCCState *s1)
             next();
         }
         break;
+    case TOK_ASM_size:
+        { 
+            Sym *sym;
+
+            next();
+            sym = label_find(tok);
+            if (!sym) {
+                error("label not found: %s", get_tok_str(tok, NULL));
+            }
+
+            next();
+            skip(',');
+            /* XXX .size name,label2-label1 */
+            if (s1->warn_unsupported)
+                warning("ignoring .size %s,*", get_tok_str(tok, NULL));
+
+            while (tok != '\n' && tok != CH_EOF) {
+                next();
+            }
+        }
+        break;
     case TOK_ASM_type:
         { 
             Sym *sym;