[paparazzi-commits] [4735] restore something working

[Pascal Brisset]

Revision: 4735
          http://svn.sv.gnu.org/viewvc/?view=rev&root=paparazzi&revision=4735
Author:   hecto
Date:     2010-03-25 22:41:56 +0000 (Thu, 25 Mar 2010)
Log Message:
-----------
 restore something working

Modified Paths:
--------------
    paparazzi3/trunk/sw/simulator/launchsitl

Modified: paparazzi3/trunk/sw/simulator/launchsitl
===================================================================
--- paparazzi3/trunk/sw/simulator/launchsitl    2010-03-25 09:40:40 UTC (rev 
4734)
+++ paparazzi3/trunk/sw/simulator/launchsitl    2010-03-25 22:41:56 UTC (rev 
4735)
@@ -12,22 +12,14 @@
   try
     let rec loop = fun i ->
       if Sys.argv.(i) = "-a" && (i+1) < n then
-        let ac = Sys.argv.(i+1) in
-        (* Shift other args *)
-        for j = i+2 to n-1 do Sys.argv.(j-2) <- Sys.argv.(j) done;
-        ac
+       let ac = Sys.argv.(i+1) in
+       (* Shift other args *)
+       for j = i+2 to n-1 do Sys.argv.(j-2) <- Sys.argv.(j) done;
+       ac
       else if i = n then raise Not_found
       else loop (i+1) in
     let ac = loop 0 in
-    (*let rec sim_type = fun i ->
-      if Sys.argv.(i) = "-jsbsim" then
-        "jsbsim"
-      else if i = n then "sim"
-      else loop (i+1) in
-    let sim = sim_type 0 in*)
-    let sim = "jsbsim" in
-    let com = paparazzi_home // "var" // ac // sim // "simsitl" in
-    prerr_endline com;
+    let com = paparazzi_home // "var" // ac // "sim/simsitl" in
     if not (Sys.file_exists com) then begin
       Printf.fprintf stderr "Error: '%s' is missing. Build target sim for A/C 
%s ?\n" com ac;
       exit 1