1 let native_convert_slashes = ref false
3 let native = Sys.os_type
= "Win32"
5 let wine_command s
= "wine " ^ s
6 let native_command s
= s
21 Sys.getenv
"WINE_PREFIX"
26 Filename.concat
(Sys.getenv
"HOME") ".wine"
29 failwith
"Can not find wine's root path"