From 31758dd03c1e4a5291ec9ce324112067c6053e28 Mon Sep 17 00:00:00 2001 From: Jan Nieuwenhuizen Date: Sun, 23 Jul 2017 23:40:23 +0200 Subject: [PATCH] mescc: Tinycc support: remove warnings for foo (void), foo (...). * module/language/c99/compiler.mes (.name, .type): Expect foo (void), foo (...). --- module/language/c99/compiler.mes | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/module/language/c99/compiler.mes b/module/language/c99/compiler.mes index 0be21182..714d32d1 100644 --- a/module/language/c99/compiler.mes +++ b/module/language/c99/compiler.mes @@ -117,6 +117,8 @@ ((fctn-defn _ (ftn-declr (ident ,name) _) _) name) ((fctn-defn _ (ptr-declr (pointer) (ftn-declr (ident ,name) _)) _) name) ((fctn-defn _ (ptr-declr (pointer (pointer)) (ftn-declr (ident ,name) _)) _) name) + ((ellipsis) #f) + ((param-decl (decl-spec-list (type-spec (void)))) #f) ((param-decl _ (param-declr (ident ,name))) name) ((param-decl _ (param-declr (ptr-declr (pointer) (ident ,name)))) name) ((param-decl _ (param-declr (ptr-declr (pointer) (array-of (ident ,name))))) name) @@ -127,6 +129,8 @@ (define (.type o) (pmatch o + ((ellipsis) #f) + ((param-decl (decl-spec-list (type-spec (void)))) #f) ((param-decl (decl-spec-list (type-spec ,type)) _) (decl->ast-type type)) ((param-decl ,type _) type) (_ -- 2.31.1