浏览代码

[cs] Add -net-lib support for Compiler.add_native_lib

Cauê Waneck 11 年之前
父节点
当前提交
bd955eef11
共有 1 个文件被更改,包括 9 次插入0 次删除
  1. 9 0
      interp.ml

+ 9 - 0
interp.ml

@@ -2505,6 +2505,15 @@ let macro_lib =
 				(match com.platform with
 				| Flash -> Genswf.add_swf_lib com file false
 				| Java -> Genjava.add_java_lib com file false
+				| Cs ->
+					let file, is_std = match ExtString.String.nsplit file "@" with
+						| [file] ->
+							file,false
+						| [file;"std"] ->
+							file,true
+						| _ -> raise Exit
+					in
+					Gencs.add_net_lib com file is_std
 				| _ -> failwith "Unsupported platform");
 				VNull
 			| _ ->