[clean] forgot a whitespace

This commit is contained in:
Gautier Hattenberger
2012-08-24 15:52:23 +02:00
parent 3414b96578
commit 9712dfacfa
+1 -1
View File
@@ -157,7 +157,7 @@ end (* module Gen_onboard *)
(********************* Main **************************************************)
let () =
if Array.length Sys.argv <> 3 then begin
failwith (sprintf "Usage: %s <.xml file> <class_name>" Sys.argv.(0))
failwith (sprintf "Usage: %s <.xml file> <class_name>" Sys.argv.(0))
end;
let filename = Sys.argv.(1)