Create main file
This commit is contained in:
parent
a79937a532
commit
51dd6e8609
|
@ -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)))
|
Loading…
Reference in New Issue