From 713fb018fc29dcde3bb3c0639a6406058d2d5727 Mon Sep 17 00:00:00 2001
From: Jeltz <jeltz@auro.re>
Date: Wed, 7 Sep 2022 06:22:22 +0200
Subject: [PATCH] Add "add table" and "add chain" commands

---
 compile.ml | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/compile.ml b/compile.ml
index f80c23f..474be8d 100644
--- a/compile.ml
+++ b/compile.ml
@@ -131,4 +131,7 @@ let compile config =
   let compiled =
     List.map (fun expr -> Command.AddRule { family; table; chain; expr }) exprs
   in
-  Command.FlushRuleset :: compiled
+  Command.FlushRuleset
+  :: Command.AddTable { family; name = table }
+  :: Command.AddChain { family; table; name = chain }
+  :: compiled