From 51dd6e860989fa97dce97ed7321b546e32b3abfb Mon Sep 17 00:00:00 2001
From: haskal <haskal@bepis.xyz>
Date: Tue, 28 Jan 2020 22:09:51 -0500
Subject: [PATCH] Create main file

---
 router.rkt | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 router.rkt

diff --git a/router.rkt b/router.rkt
new file mode 100644
index 0000000..977dbab
--- /dev/null
+++ b/router.rkt
@@ -0,0 +1,16 @@
+#lang racket
+
+;; Str [Listof Str] ->
+;; Router main
+(define (run-router asn ip-addrs)
+  (displayln asn)
+  (map displayln ip-addrs)
+  (void))
+
+(module+ main
+    (command-line
+     #:program "router"
+     #:args
+     (asn . ip-addrs)
+     ;; Run the router
+     (run-router asn ip-addrs)))