Coccinelle release 0.2.5-rc9

[bpt/coccinelle.git] / python / no_pycocci.ml

diff --git a/python/no_pycocci.ml b/python/no_pycocci.ml
index a371f2c..96b5289 100644 (file)
--- a/python/no_pycocci.ml
+++ b/python/no_pycocci.ml
@@ -1,25 +1,3 @@
-(*
-* Copyright 2005-2009, Ecole des Mines de Nantes, University of Copenhagen
-* Yoann Padioleau, Julia Lawall, Rene Rydhof Hansen, Henrik Stuart, Gilles Muller
-* 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 <http://www.gnu.org/licenses/>.
-* 
-* The authors reserve the right to distribute this or future versions of
-* Coccinelle under other licenses.
-*)
-
-
 open Ast_c
 open Common
 open Pycocci_aux
@@ -27,6 +5,8 @@ module StringMap = Map.Make (String)
 
 exception Pycocciexception
 
+let python_support = false
+
 let check_return_value v = failwith "no python"
 let check_int_return_value v = failwith "no python"
 
@@ -74,20 +54,23 @@ let build_classes env = failwith "no python"
 
 let build_variable name value = failwith "no python"
 
-let contains_binding e (_,(r,m)) = failwith "no python"
+let contains_binding e (_,(r,m),_) = failwith "no python"
 
 let construct_variables mv e = failwith "no python"
 
+let construct_script_variables mv = failwith "no python"
+let retrieve_script_variables mv = failwith "no python"
+
 let set_coccifile cocci_file =
        cocci_file_name := cocci_file;
        ()
 
 
-let pyrun_simplestring s = 
+let pyrun_simplestring s =
   failwith "no python"
- 
-let py_isinitialized () = 
+
+let py_isinitialized () =
   failwith "no python"
- 
+
 let py_finalize () =
   failwith "no python"