summaryrefslogtreecommitdiff
path: root/cparser
diff options
context:
space:
mode:
Diffstat (limited to 'cparser')
-rw-r--r--cparser/Elab.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/cparser/Elab.ml b/cparser/Elab.ml
index 4cbda39..fa9fd24 100644
--- a/cparser/Elab.ml
+++ b/cparser/Elab.ml
@@ -510,7 +510,7 @@ and elab_parameter env (spec, name) =
if sto <> Storage_default && sto <> Storage_register then
error (loc_of_name name)
"'extern' or 'static' storage not supported for function parameter";
- if redef Env.lookup_ident env id <> None then
+ if id <> "" && redef Env.lookup_ident env id <> None then
error (loc_of_name name) "redefinition of parameter '%s'" id;
(* replace array and function types by pointer types *)
let ty1 = argument_conversion env1 ty in