We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent f89a373 commit 34fecf4Copy full SHA for 34fecf4
src/ext/syntacticsearch/funcVar.ml
@@ -30,9 +30,10 @@ let is_temporary id = Inthash.mem allTempVars id
30
(* fails when there is no function with name fname in cilfile *)
31
let get_func_loc cilfile fname =
32
let rec find_loc = function
33
- | [] -> failwith ("no function with name " ^ fname ^ " found")
34
- | GFun (fd, loc) :: l when fd.svar.vname = fname -> loc
35
- | _ :: l -> find_loc l in
+ | [] -> failwith ("no function with name " ^ fname ^ " found")
+ | GFun (fd, loc) :: l when fd.svar.vname = fname -> loc
+ | _ :: l -> find_loc l
36
+ in
37
find_loc cilfile.globals
38
39
let generate_globalvar_list cilfile =
0 commit comments