From 12e1ffffdafcdd875409bd4ff66f913cb66591af Mon Sep 17 00:00:00 2001
From: Mylloon <kennel.anri@tutanota.com>
Date: Tue, 4 Jul 2023 10:49:37 +0200
Subject: [PATCH] add a type for DNS

---
 lib/types.ml | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/lib/types.ml b/lib/types.ml
index 6d8059b..d38ff32 100644
--- a/lib/types.ml
+++ b/lib/types.ml
@@ -33,3 +33,9 @@ type dns_packet =
   ; authorities : dns_record list
   ; additionals : dns_record list
   }
+
+module DNSType = struct
+  let a = 1
+  let ns = 2
+  let txt = 16
+end