Displaying 3 results from an estimated 3 matches for "40a19bc".
2016 Jul 07
0
[PATCH v3 4/8] mllib: Add some imperative list manipulation functions.
...s else xs in
with:
let xs = ref ys in
if foo then append xs zs;
---
mllib/common_utils.ml | 20 ++++++++++++++++++++
mllib/common_utils.mli | 36 ++++++++++++++++++++++++++++++++++++
2 files changed, 56 insertions(+)
diff --git a/mllib/common_utils.ml b/mllib/common_utils.ml
index 77b9acd..40a19bc 100644
--- a/mllib/common_utils.ml
+++ b/mllib/common_utils.ml
@@ -282,6 +282,26 @@ let sort_uniq ?(cmp = Pervasives.compare) xs =
let xs = uniq ~cmp xs in
xs
+let push xsp x = xsp := !xsp @ [x]
+let unshift x xsp = xsp := x :: !xsp
+let pop xsp =
+ let x, xs =
+ match List.rev !xsp wit...
2016 Jul 07
12
[PATCH v3 0/8] v2v: Move Curl wrapper to mllib and more.
v2 -> v3:
- Changes to the Curl API suggested by Pino.
2016 Jul 07
9
[PATCH v2 0/8] v2v: Move Curl wrapper to mllib and use it for virt-builder (and more).
v1 -> v2:
- Fixed the bug with precedence of if / @.
- Add some imperative list operators inspired by Perl, and use those
for constructing the Curl arguments, and more.
Rich.