mirror of
https://github.com/libguestfs/libguestfs.git
synced 2026-03-22 07:03:38 +00:00
automake2junit.ml: use LargeFile to stat'ing files
While scanning the sources, some of the files (i.e. the cached appliance) may be larger than 4G, and thus raise EOVERFLOW on 32bit architectures. Fixes commitb4e119d8b7. (cherry picked from commitba53251ab9)
This commit is contained in:
committed by
Richard W.M. Jones
parent
f7df2acc66
commit
3c0a77fbf7
@@ -85,7 +85,7 @@ let find_trs basedir =
|
||||
let rec work dirs files = function
|
||||
| [] -> dirs, files
|
||||
| ((_, full_x) as x) :: xs ->
|
||||
match (Unix.lstat full_x).Unix.st_kind with
|
||||
match (Unix.LargeFile.lstat full_x).Unix.LargeFile.st_kind with
|
||||
| Unix.S_REG -> work dirs (x :: files) xs
|
||||
| Unix.S_DIR -> work (x :: dirs) files xs
|
||||
| _ -> work dirs files xs
|
||||
|
||||
Reference in New Issue
Block a user