X-Git-Url: https://git.hcoop.net/bpt/coccinelle.git/blobdiff_plain/c491d8eea333ab3273dc415c7d7af192e1d0b682..6756e19d8b45188ff250016a494aafe46dec86c5:/engine/flag_matcher.ml diff --git a/engine/flag_matcher.ml b/engine/flag_matcher.ml dissimilarity index 66% index 100dead..0b6035e 100644 --- a/engine/flag_matcher.ml +++ b/engine/flag_matcher.ml @@ -1,47 +1,23 @@ -(* - * Copyright 2010, 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. - *) - - -let debug_engine = ref false -let verbose_matcher = ref true - - -(* false = simpler formulas, only for debugging *) -let useEU = ref true - -let disallow_nested_exps = ref false - -(* if this flag is not set, then break and continue are also error exits *) -let only_return_is_error_exit = ref false - -(* a hack to allow adding code in some more sgrep-like uses *) -let allow_inconsistent_paths = ref false - -(* see the use of this variable in asttoctl2.ml *) -let no_safe_expressions = ref false - -let show_misc = ref true - - -let show_transinfo = ref false - +let debug_engine = ref false +let verbose_matcher = ref true + + +(* false = simpler formulas, only for debugging *) +let useEU = ref true + +let disallow_nested_exps = ref false + +(* if this flag is not set, then break and continue are also error exits *) +let only_return_is_error_exit = ref false + +(* a hack to allow adding code in some more sgrep-like uses *) +let allow_inconsistent_paths = ref false + +(* see the use of this variable in asttoctl2.ml *) +let no_safe_expressions = ref false + +let show_misc = ref true + + +let show_transinfo = ref false +