Skip to content

Commit

Permalink
fix indentation
Browse files Browse the repository at this point in the history
Co-authored-by: Michael Schwarz <michael.schwarz93@gmail.com>
  • Loading branch information
stilscher and michael-schwarz authored Sep 15, 2023
1 parent f89a373 commit 34fecf4
Showing 1 changed file with 4 additions and 3 deletions.
7 changes: 4 additions & 3 deletions src/ext/syntacticsearch/funcVar.ml
Original file line number Diff line number Diff line change
Expand Up @@ -30,9 +30,10 @@ let is_temporary id = Inthash.mem allTempVars id
(* fails when there is no function with name fname in cilfile *)
let get_func_loc cilfile fname =
let rec find_loc = function
| [] -> failwith ("no function with name " ^ fname ^ " found")
| GFun (fd, loc) :: l when fd.svar.vname = fname -> loc
| _ :: 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
in
find_loc cilfile.globals

let generate_globalvar_list cilfile =
Expand Down

0 comments on commit 34fecf4

Please sign in to comment.