From 272a5b812b72f4c3e409ccdbeaf3476d95c4b552 Mon Sep 17 00:00:00 2001
From: Bernhard Schommer <bernhardschommer@gmail.com>
Date: Tue, 15 Mar 2016 15:07:47 +0100
Subject: Deactivate warning 27 and added back removed code.

The code was mostly there for documentation effort. So warning
27 is deactivated again.
Bug 18349
---
 cparser/Bitfields.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'cparser/Bitfields.ml')

diff --git a/cparser/Bitfields.ml b/cparser/Bitfields.ml
index 6e325ff2..d55a6d36 100644
--- a/cparser/Bitfields.ml
+++ b/cparser/Bitfields.ml
@@ -513,7 +513,7 @@ let transf_decl env (sto, id, ty, init_opt) =
 
 let transf_stmt env s =
   Transform.stmt
-     ~expr:(fun _ env ctx e -> transf_exp env ctx e)
+     ~expr:(fun loc env ctx e -> transf_exp env ctx e)
      ~decl:transf_decl
      env s
 
-- 
cgit