Signed-off-by: Matthias Goergens <[email protected]>
stdext/stringext.ml | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-)
# HG changeset patch # User Matthias Goergens <[email protected]> # Date 1272293888 -3600 # Node ID 7db08a326938ecc231f58afdc8f69718c98e4b8b # Parent bc1d3f2ac83a28c07fef4a63105a314043b65c82 Extended a comment in stdext/stringext.ml Signed-off-by: Matthias Goergens <[email protected]> diff -r bc1d3f2ac83a -r 7db08a326938 stdext/stringext.ml --- a/stdext/stringext.ml +++ b/stdext/stringext.ml @@ -89,7 +89,7 @@ concat "" (fold_right aux string []) (** Take a predicate and a string, return a list of strings separated by -runs of characters where the predicate was true *) +runs of characters where the predicate was true (excluding those characters from the result) *) let split_f p str = let not_p = fun x -> not (p x) in let rec split_one p acc = function
_______________________________________________ xen-api mailing list [email protected] http://lists.xensource.com/mailman/listinfo/xen-api
