Browse Source

[java/cs] Always create path/to/file directories

Cauê Waneck 11 years ago
parent
commit
faaa204652
2 changed files with 4 additions and 0 deletions
  1. 2 0
      gencs.ml
  2. 2 0
      genjava.ml

+ 2 - 0
gencs.ml

@@ -2910,6 +2910,8 @@ let configure gen =
 
 
 	let t = Common.timer "code generation" in
 	let t = Common.timer "code generation" in
 
 
+	let parts = Str.split_delim (Str.regexp "[\\/]+") gen.gcon.file in
+	mkdir_recursive "" parts;
 	generate_modules gen "cs" "src" module_gen;
 	generate_modules gen "cs" "src" module_gen;
 
 
 	dump_descriptor gen ("hxcs_build.txt") path_s module_s;
 	dump_descriptor gen ("hxcs_build.txt") path_s module_s;

+ 2 - 0
genjava.ml

@@ -2305,6 +2305,8 @@ let configure gen =
 
 
 	let t = Common.timer "code generation" in
 	let t = Common.timer "code generation" in
 
 
+	let parts = Str.split_delim (Str.regexp "[\\/]+") gen.gcon.file in
+	mkdir_recursive "" parts;
 	generate_modules_t gen "java" "src" change_path module_gen;
 	generate_modules_t gen "java" "src" change_path module_gen;
 
 
 	let path_s_desc path = path_s path [] in
 	let path_s_desc path = path_s path [] in