let
fold_load_path x f acc =
Queue
.fold (
fun
x y
->
f y x) acc x