Jelajahi Sumber

[cs] Enforce no-root for Math and Std classes; Closes #2631

Cauê Waneck 11 tahun lalu
induk
melakukan
e2f49ff6cb
1 mengubah file dengan 3 tambahan dan 0 penghapusan
  1. 3 0
      gencs.ml

+ 3 - 0
gencs.ml

@@ -641,6 +641,9 @@ let configure gen =
   let change_ns md = if no_root then
     function
       | [] when is_hxgen md -> ["haxe";"root"]
+      | [] -> (match md with
+        | TClassDecl { cl_path = ([],"Std" | [],"Math") } -> ["haxe";"root"]
+        | _ -> [])
       | ns -> List.map change_id ns
   else List.map change_id in