Skip to content
Permalink
Browse files

Merge pull request #833 from pascutto/index

irmin-pack: remove shared argument from index
  • Loading branch information...
samoht committed Aug 12, 2019
2 parents d8ec94b + 7b53e2d commit 07a0a95ce4de6b63bdc55026c4461fece3ddd764
Showing with 2 additions and 4 deletions.
  1. +1 −1 src/irmin-pack/irmin_pack.ml
  2. +0 −1 src/irmin-pack/pack_index.ml
  3. +0 −1 src/irmin-pack/pack_index.mli
  4. +1 −1 test/irmin-pack/test_pack.ml
@@ -392,7 +392,7 @@ struct
let readonly = readonly config in
let shared = shared config in
let log_size = index_log_size config in
let index = Index.v ~fresh ~shared ~readonly ~log_size root in
let index = Index.v ~fresh ~readonly ~log_size root in
Contents.CA.v ~fresh ~shared ~readonly ~lru_size ~index root
>>= fun contents ->
Node.CA.v ~fresh ~shared ~readonly ~lru_size ~index root
@@ -20,7 +20,6 @@ module type S = sig
val v :
?fresh:bool ->
?readonly:bool ->
?shared:bool ->
log_size:int ->
string ->
t
@@ -20,7 +20,6 @@ module type S = sig
val v :
?fresh:bool ->
?readonly:bool ->
?shared:bool ->
log_size:int ->
string ->
t
@@ -144,7 +144,7 @@ let test_pack _switch () =
let test_readonly_pack _switch () =
let index = get_index ~fresh:true test_dir in
Pack.v ~fresh:true ~index test_dir >>= fun w ->
let index = get_index ~fresh:false ~shared:false ~readonly:true test_dir in
let index = get_index ~fresh:false ~readonly:true test_dir in
Pack.v ~fresh:false ~shared:false ~readonly:true ~index test_dir >>= fun r ->
let adds l = List.iter (fun (k, v) -> Pack.unsafe_append w k v) l in
let x1 = "foo" in

0 comments on commit 07a0a95

Please sign in to comment.
You can’t perform that action at this time.