X-Git-Url: http://git.hcoop.net/bpt/coccinelle.git/blobdiff_plain/9f8e26f459677a621822918b7539ae94214621ac..7f339edd551eefcd6c99f379ce91c27df997cfe3:/ctl/wrapper_ctl.mli

diff --git a/ctl/wrapper_ctl.mli b/ctl/wrapper_ctl.mli
index 0d078d3..b6ad3ab 100644
--- a/ctl/wrapper_ctl.mli
+++ b/ctl/wrapper_ctl.mli
@@ -1,4 +1,8 @@
 (*
+ * Copyright 2012, INRIA
+ * Julia Lawall, Gilles Muller
+ * Copyright 2010-2011, INRIA, University of Copenhagen
+ * Julia Lawall, Rene Rydhof Hansen, Gilles Muller, Nicolas Palix
  * Copyright 2005-2009, Ecole des Mines de Nantes, University of Copenhagen
  * Yoann Padioleau, Julia Lawall, Rene Rydhof Hansen, Henrik Stuart, Gilles Muller, Nicolas Palix
  * This file is part of Coccinelle.
@@ -20,9 +24,10 @@
  *)
 
 
+# 0 "./wrapper_ctl.mli"
 type info = int
 
-type ('pred, 'mvar) wrapped_ctl = 
+type ('pred, 'mvar) wrapped_ctl =
     ('pred * 'mvar Ast_ctl.modif,  'mvar, info) Ast_ctl.generic_ctl
 
 type ('a, 'b) wrapped_binding =
@@ -30,7 +35,7 @@ type ('a, 'b) wrapped_binding =
   | PredVal of 'b Ast_ctl.modif
 
 type ('pred,'state,'mvar,'value) labelfunc =
-    'pred -> 
+    'pred ->
       ('state * ('pred * ('mvar, 'value) Ast_ctl.generic_substitution))  list
 
 module CTL_ENGINE_BIS :
@@ -73,7 +78,7 @@ module CTL_ENGINE_BIS :
     val satbis :
 	G.cfg *
 	 (predicate,G.node,SUB.mvar,SUB.value) labelfunc *
-         G.node list -> 
+         G.node list ->
 	   ((predicate,SUB.mvar) wrapped_ctl *
 	      (WRAPPER_PRED.t list list)) ->
 		(WRAPPER_ENV.mvar list * (SUB.mvar * SUB.value) list) ->