From fcf7264f94c9e92c284abb8b6c1a27acd0d8000c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?C=C3=A9dric=20Pasteur?= Date: Fri, 18 Jun 2010 14:01:13 +0200 Subject: [PATCH] Port fix from hept_arrays branch --- minils/sequential/cgen.ml | 4 ---- 1 file changed, 4 deletions(-) diff --git a/minils/sequential/cgen.ml b/minils/sequential/cgen.ml index 80484ee..ec51b3e 100644 --- a/minils/sequential/cgen.ml +++ b/minils/sequential/cgen.ml @@ -915,8 +915,4 @@ let global_file_header name prog = let translate name prog = let modname = (Filename.basename name) in global_name := String.capitalize modname; - (match !simulation_node with - | None -> () - | Some s -> simulation_node := Some (String.capitalize name ^ "_" ^ s) - ); (global_file_header modname prog) :: (cfile_list_of_oprog modname prog)