Skip to content
This repository has been archived by the owner on Jun 4, 2019. It is now read-only.

Commit

Permalink
* main_codeslicer.ml: misc
Browse files Browse the repository at this point in the history
  • Loading branch information
aryx committed Aug 5, 2015
1 parent 1d239d5 commit 9ed17dc
Showing 1 changed file with 5 additions and 5 deletions.
10 changes: 5 additions & 5 deletions main_codeslicer.ml
Expand Up @@ -494,8 +494,8 @@ let lpize xs =

let (xs, _stat) =
(* CONFIG *)
(* Parse_ml.parse file *)
Parse_cpp.parse file
(* Parse_ml.parse file*)
Parse_cpp.parse file
in
let env = {
current_file = file;
Expand All @@ -508,8 +508,8 @@ let lpize xs =
} in
let entities =
(* CONFIG *)
(* extract_entities_ml env xs *)
extract_entities_cpp env xs
(* extract_entities_ml env xs *)
extract_entities_cpp env xs
in

let hstart =
Expand Down Expand Up @@ -570,7 +570,7 @@ let lpize xs =

(* CONFIG *)
(* for the initial 'make sync' to work *)
Sys.command (spf "rm -f %s" file) +> ignore;
Sys.command (spf "rm -f %s" file) +> ignore;
);
()

Expand Down

0 comments on commit 9ed17dc

Please sign in to comment.