Procházet zdrojové kódy

[eval] fixed flags handling in eval.luv.File.copyFile and .symlink

Aleksandr Kuzmenko před 4 roky
rodič
revize
a16c00f6af
1 změnil soubory, kde provedl 2 přidání a 1 odebrání
  1. 2 1
      src/macro/eval/evalLuv.ml

+ 2 - 1
src/macro/eval/evalLuv.ml

@@ -436,7 +436,8 @@ let encode_scandir sd =
 	]
 
 let decode_int_flags v =
-	List.map decode_int (decode_array v)
+	if v = VNull then []
+	else List.map decode_int (decode_array v)
 
 let decode_file_open_flag v : File.Open_flag.t =
 	match decode_int v with