From 6507802928d50f97511c2cb8bca5c9bb389385e1 Mon Sep 17 00:00:00 2001 From: xleroy Date: Thu, 12 May 2011 12:22:43 +0000 Subject: Silence a warning that happens all too often in MacOS X git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1654 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- cparser/Elab.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'cparser/Elab.ml') diff --git a/cparser/Elab.ml b/cparser/Elab.ml index eaba8d8..98d9d8b 100644 --- a/cparser/Elab.ml +++ b/cparser/Elab.ml @@ -289,8 +289,8 @@ let elab_attribute loc env = function | ("volatile", []) -> [AVolatile] | (("__attribute" | "__attribute__"), l) -> List.flatten (List.map (elab_gcc_attr loc env) l) - | (name, _) -> - warning loc "`%s' annotation ignored" name; [] + | ("__asm__", _) -> [] (* MacOS X noise *) + | (name, _) -> warning loc "`%s' annotation ignored" name; [] let elab_attributes loc env al = List.fold_left add_attributes [] (List.map (elab_attribute loc env) al) -- cgit v1.2.3