search for: rev_map

To rebuild, it would be enough to remove .git/svn/refs/remotes/git-svn/.rev_map.* My usual way to resync; $ git fetch llvm.org (is remote name) $ git update-ref refs/remotes/git-svn llvm.org/master $ git svn fetch Partial-rebuilding .git/svn/refs/remotes/git-svn/.rev_map.91177308-0d34-0410-b5e6-96231b3b80d8 ... Currently at 124651 = 071d3af0de273b1079d79f7f979264f28d567373...

On Feb 1, 2011, at 12:20 PM, Anton Korobeynikov wrote: > Hello Everyone, > > It seems given the decent amount of discussions it's time to make > small announcement. > > So, official git mirrors are available for some subset of LLVM > projects. They were used by some LLVM developers for couple of months > already and seem to be stable enough. Thank you for setting

Hello Everyone, It seems given the decent amount of discussions it's time to make small announcement. So, official git mirrors are available for some subset of LLVM projects. They were used by some LLVM developers for couple of months already and seem to be stable enough. Right now there is a mirroring for LLVM itself and clang. More can be added per requests. The mirrors are made via

...l iter : ('a -> unit) -> 'a list -> unit + val iteri : (int -> 'a -> unit) -> 'a list -> unit + val map : ('a -> 'b) -> 'a list -> 'b list + val mapi : (int -> 'a -> 'b) -> 'a list -> 'b list + val rev_map : ('a -> 'b) -> 'a list -> 'b list + val fold_left : ('a -> 'b -> 'a) -> 'a -> 'b list -> 'a + val fold_right : ('a -> 'b -> 'b) -> 'a list -> 'b -> 'b + val iter2 : ('a -> 'b...

The new run_shell helper is a copy of run_python, and will be used by upcoming changes. Signed-off-by: Olaf Hering <olaf at aepfle.de> --- src/supermin_utils.ml | 9 +++++++++ src/supermin_utils.mli | 5 +++++ 2 files changed, 14 insertions(+) diff --git a/src/supermin_utils.ml b/src/supermin_utils.ml index f98e09a..cb8a27e 100644 --- a/src/supermin_utils.ml +++ b/src/supermin_utils.ml

v2 -> v3: - Renamed List.assoc_ -> List.assoc_lbl. - Rebased on top of current master branch. Rich.

This time including the first commit ...

...ursively *) - let walk_directory_tree dir pattern = - let select str = Str.string_match (Str.regexp pattern) str 0 in - let rec walk acc = function - | [] -> (acc) - | dir::tail -> - let contents = Array.to_list (Sys.readdir dir) in - let contents = List.rev_map (Filename.concat dir) contents in - let dirs, files = - List.fold_left (fun (dirs,files) f -> - match (stat f).st_kind with - | S_REG -> (dirs, f::files) (* Regular file *) - | S_DIR -> (f::dirs, files) (* Directory *) -...