diff --git a/src/vmm_asn.ml b/src/vmm_asn.ml index 1313e91..6c67020 100644 --- a/src/vmm_asn.ml +++ b/src/vmm_asn.ml @@ -1,4 +1,4 @@ -(* (c) 2017 Hannes Mehnert, all rights reserved *) +(* (c) 2017, 2018 Hannes Mehnert, all rights reserved *) open Vmm_core open Vmm_commands diff --git a/src/vmm_asn.mli b/src/vmm_asn.mli index 8fd920d..8dc17e1 100644 --- a/src/vmm_asn.mli +++ b/src/vmm_asn.mli @@ -1,4 +1,4 @@ -(* (c) 2017 Hannes Mehnert, all rights reserved *) +(* (c) 2017, 2018 Hannes Mehnert, all rights reserved *) open Vmm_core diff --git a/src/vmm_commands.mli b/src/vmm_commands.mli index 430618a..9d6af05 100644 --- a/src/vmm_commands.mli +++ b/src/vmm_commands.mli @@ -1,3 +1,5 @@ +(* (c) 2018 Hannes Mehnert, all rights reserved *) + open Vmm_core (** The type of versions of the grammar defined below. *) diff --git a/src/vmm_compress.mli b/src/vmm_compress.mli index cfceea6..16948cb 100644 --- a/src/vmm_compress.mli +++ b/src/vmm_compress.mli @@ -1,2 +1,4 @@ +(* (c) 2018 Hannes Mehnert, all rights reserved *) + val compress : ?level:int -> string -> string val uncompress : string -> (string, unit) result diff --git a/src/vmm_core.mli b/src/vmm_core.mli index 48c91e5..479c7ef 100644 --- a/src/vmm_core.mli +++ b/src/vmm_core.mli @@ -1,3 +1,5 @@ +(* (c) 2018 Hannes Mehnert, all rights reserved *) + val tmpdir : Fpath.t val dbdir : Fpath.t diff --git a/src/vmm_lwt.mli b/src/vmm_lwt.mli index f98809b..ae7445e 100644 --- a/src/vmm_lwt.mli +++ b/src/vmm_lwt.mli @@ -1,3 +1,5 @@ +(* (c) 2018 Hannes Mehnert, all rights reserved *) + val pp_sockaddr : Format.formatter -> Lwt_unix.sockaddr -> unit val pp_process_status : Format.formatter -> Unix.process_status -> unit diff --git a/src/vmm_tls.ml b/src/vmm_tls.ml index a7c41df..998cd97 100644 --- a/src/vmm_tls.ml +++ b/src/vmm_tls.ml @@ -1,3 +1,5 @@ +(* (c) 2018 Hannes Mehnert, all rights reserved *) + open Rresult.R.Infix open Vmm_core diff --git a/src/vmm_tls.mli b/src/vmm_tls.mli index 8880c37..ebb5e2f 100644 --- a/src/vmm_tls.mli +++ b/src/vmm_tls.mli @@ -1,3 +1,4 @@ +(* (c) 2018 Hannes Mehnert, all rights reserved *) val handle : 'a -> Vmm_commands.version -> diff --git a/src/vmm_tls_lwt.mli b/src/vmm_tls_lwt.mli index b72e093..39886d6 100644 --- a/src/vmm_tls_lwt.mli +++ b/src/vmm_tls_lwt.mli @@ -1,3 +1,5 @@ +(* (c) 2017, 2018 Hannes Mehnert, all rights reserved *) + val read_tls : Tls_lwt.Unix.t -> (Vmm_commands.wire, [> `Eof | `Exception | `Toomuch ]) result Lwt.t diff --git a/src/vmm_trie.ml b/src/vmm_trie.ml index ae1559b..9185fb7 100644 --- a/src/vmm_trie.ml +++ b/src/vmm_trie.ml @@ -1,3 +1,5 @@ +(* (c) 2018 Hannes Mehnert, all rights reserved *) + open Astring type 'a t = N of 'a option * 'a t String.Map.t diff --git a/src/vmm_trie.mli b/src/vmm_trie.mli index 2564df1..d0ff91b 100644 --- a/src/vmm_trie.mli +++ b/src/vmm_trie.mli @@ -1,3 +1,5 @@ +(* (c) 2018 Hannes Mehnert, all rights reserved *) + open Vmm_core type 'a t diff --git a/src/vmm_vmmd.mli b/src/vmm_vmmd.mli index 3f4fd2f..867bd3e 100644 --- a/src/vmm_vmmd.mli +++ b/src/vmm_vmmd.mli @@ -1,3 +1,4 @@ +(* (c) 2017, 2018 Hannes Mehnert, all rights reserved *) type 'a t