diff options
| -rwxr-xr-x | build.sh | 4 | ||||
| -rw-r--r-- | lib/bindings.ml | 12 |
2 files changed, 2 insertions, 14 deletions
@@ -2,8 +2,8 @@ DIR=$1 -sudo sh -c 'eval $(opam env --root=/opt/opam --set-root) && opam pin add vyos1x-config https://github.com/vyos/vyos1x-config.git#6f272cd81318e719d91dcc06b1a5cfb435e1f4c7 -y' -sudo sh -c 'eval $(opam env --root=/opt/opam --set-root) && opam pin add vyconf https://github.com/vyos/vyconf.git#920b75a6dbf9eac4b94600b759818b2ec28004ae -y' +sudo sh -c 'eval $(opam env --root=/opt/opam --set-root) && opam pin add vyos1x-config https://github.com/vyos/vyos1x-config.git#ccdc583f0f02583771fadae353166ef1a904f4e3 -y' +sudo sh -c 'eval $(opam env --root=/opt/opam --set-root) && opam pin add vyconf https://github.com/vyos/vyconf.git#0fb5e2f781725196ae010cf64e4d185a8f5ce721 -y' eval `opam config env` make clean diff --git a/lib/bindings.ml b/lib/bindings.ml index 0ce05d1..604c05f 100644 --- a/lib/bindings.ml +++ b/lib/bindings.ml @@ -270,16 +270,6 @@ let mask_tree c_ptr_l c_ptr_r = | CD.Incommensurable -> error_message := "Incommensurable"; Ctypes.null | CD.Empty_comparison -> error_message := "Empty comparison"; Ctypes.null -let show_commit_data c_ptr_a c_ptr_w = - let ct_a = Root.get c_ptr_a in - let ct_w = Root.get c_ptr_w in - CM.show_commit_data ct_a ct_w - -let test_commit c_ptr_a c_ptr_w = - let ct_a = Root.get c_ptr_a in - let ct_w = Root.get c_ptr_w in - VC.test_commit ct_a ct_w - module Stubs(I : Cstubs_inverted.INTERNAL) = struct @@ -316,6 +306,4 @@ struct let () = I.internal "tree_union" ((ptr void) @-> (ptr void) @-> returning (ptr void)) tree_union let () = I.internal "reference_tree_to_json" (string @-> string @-> string @-> returning int) reference_tree_to_json let () = I.internal "mask_tree" ((ptr void) @-> (ptr void) @-> returning (ptr void)) mask_tree - let () = I.internal "show_commit_data" ((ptr void) @-> (ptr void) @-> returning string) show_commit_data - let () = I.internal "test_commit" ((ptr void) @-> (ptr void) @-> returning void) test_commit end |