forked from pool/coccinelle
Jan Engelhardt
d098821b2f
OBS-URL: https://build.opensuse.org/package/show/devel:tools/coccinelle?expand=0&rev=32
22 lines
743 B
Diff
22 lines
743 B
Diff
From: Luis R. Rodriguez <mcgrof@do-not-panic.com>
|
|
Date: Tue, 9 Sep 2014 15:10:42 -0700
|
|
X-Upstream: should appear in 1.0.0~rc22
|
|
|
|
The functions do take five arguments, but these two call sites erroneously
|
|
just passed four.
|
|
|
|
--- a/ocaml/no_prepare_ocamlcocci.ml
|
|
+++ b/ocaml/no_prepare_ocamlcocci.ml
|
|
@@ -9,9 +9,9 @@
|
|
function
|
|
Ast_cocci.ScriptRule (name,"ocaml",deps,mv,script_vars,code) ->
|
|
code :: prev
|
|
- | Ast_cocci.InitialScriptRule (name,"ocaml",deps,code) ->
|
|
+ | Ast_cocci.InitialScriptRule (name,"ocaml",deps,mvs,code) ->
|
|
code :: prev
|
|
- | Ast_cocci.FinalScriptRule (name,"ocaml",deps,code) ->
|
|
+ | Ast_cocci.FinalScriptRule (name,"ocaml",deps,mvs,code) ->
|
|
code :: prev
|
|
| _ -> prev)
|
|
[] code in
|