HCoop
/
bpt
/
coccinelle.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Coccinelle release 1.0.0-rc14
[bpt/coccinelle.git]
/
parsing_cocci
/
flag_parsing_cocci.ml
diff --git
a/parsing_cocci/flag_parsing_cocci.ml
b/parsing_cocci/flag_parsing_cocci.ml
index
9b30625
..
ee60b08
100644
(file)
--- a/
parsing_cocci/flag_parsing_cocci.ml
+++ b/
parsing_cocci/flag_parsing_cocci.ml
@@
-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.
* 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,6
+24,7
@@
*)
*)
+# 0 "./flag_parsing_cocci.ml"
(* uses E rather than A and adds comments indicating the start and end of
each matched term *)
(* uses E rather than A and adds comments indicating the start and end of
each matched term *)
@@
-28,9
+33,11
@@
let sgrep_mode = ref false (* no longer supported, subsumed by sgrep2 *)
let show_SP = ref false
let show_iso_failures = ref true
let show_SP = ref false
let show_iso_failures = ref true
-let iso_limit = ref (None : int option) (*(Some 3)*)
+(* interpret the patch in an inverted way *)
+let interpret_inverted = ref false
-let defined_virtual_rules = ref ([] : string list)
+let iso_limit = ref (None : int option) (*(Some 3)*)
+let disabled_isos = ref ([] : string list)
-let set_defined_virtual_rules s =
- defined_virtual_rules := s :: !defined_virtual_rules
+(* Used to debug embedded ML scripts *)
+let keep_ml_script = ref false