X-Git-Url: https://git.hcoop.net/bpt/coccinelle.git/blobdiff_plain/708f4980a90e2a254d7863f875888e9f5c6db0b3..feec80c30d140c69f5d894bd09b6071247d0fbaa:/engine/ctlcocci_integration.mli diff --git a/engine/ctlcocci_integration.mli b/engine/ctlcocci_integration.mli index f515e06..9c75cf3 100644 --- a/engine/ctlcocci_integration.mli +++ b/engine/ctlcocci_integration.mli @@ -1,24 +1,51 @@ -open Ograph_extended +(* + * 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. + * + * Coccinelle is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, according to version 2 of the License. + * + * Coccinelle is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with Coccinelle. If not, see . + * + * The authors reserve the right to distribute this or future versions of + * Coccinelle under other licenses. + *) + + +# 0 "./ctlcocci_integration.mli" +open Ograph_extended val labels_for_ctl : string list (* dropped isos *) -> - (nodei * Control_flow_c.node) list -> Lib_engine.metavars_binding -> + (nodei * Control_flow_c.node) list -> Lib_engine.metavars_binding -> Lib_engine.label_ctlcocci val fix_flow_ctl : Control_flow_c.cflow -> Control_flow_c.cflow -val model_for_ctl : - string list (* dropped isos *) -> +val model_for_ctl : + string list (* dropped isos *) -> Control_flow_c.cflow -> Lib_engine.metavars_binding -> Lib_engine.model type pred = Lib_engine.predicate * Ast_cocci.meta_name Ast_ctl.modif val mysat : - Lib_engine.model -> - (Lib_engine.ctlcocci * (pred list list)) -> - (Lib_engine.mvar list * Lib_engine.metavars_binding) -> + Lib_engine.model -> + (Lib_engine.ctlcocci * (pred list list)) -> + (string (*rulename*) * Lib_engine.mvar list * Lib_engine.metavars_binding)-> (Lib_engine.numbered_transformation_info * bool * Lib_engine.metavars_binding * Lib_engine.metavars_binding list)