<commit_before>open Mirage

(** Always compile DNS zone file data into the unikernel *)
let data = crunch "./data"

(** Define the shape of the service.  We depend on the `dns`
    package, and it requires a logging console, a read-only
    key/value store and a TCP/IP stack. *)
let dns_handler =
  let libraries = ["dns.lwt-core"; "mirage-logs"; "duration"] in
  let packages = ["dns"; "mirage-logs"; "duration"] in
  foreign
    ~libraries ~packages
    "Unikernel.Main" (clock @-> kv_ro @-> stackv4 @-> job)

let stack = generic_stackv4 tap0

let () =
  register "dns" [dns_handler $ default_clock $ data $ stack]
<commit_msg>revert dependency on dns.lwt-core, use dns.mirage<commit_after>open Mirage

(** Always compile DNS zone file data into the unikernel *)
let data = crunch "./data"

(** Define the shape of the service.  We depend on the `dns`
    package, and it requires a logging console, a read-only
    key/value store and a TCP/IP stack. *)
let dns_handler =
  let libraries = ["dns.mirage"; "mirage-logs"; "duration"] in
  let packages = ["dns"; "mirage-logs"; "duration"] in
  foreign
    ~libraries ~packages
    "Unikernel.Main" (clock @-> kv_ro @-> stackv4 @-> job)

let stack = generic_stackv4 tap0

let () =
  register "dns" [dns_handler $ default_clock $ data $ stack]

{'fraction_non_alphanumeric': 0.1275115919629057, 'fraction_numerical': 0.00463678516228748, 'mean_word_length': 3.658273381294964, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 9, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '2073541', 'n_tokens_mistral': 436, 'n_tokens_neox': 427, 'n_words': 153}