Omit misleading debug output
This commit is contained in:
parent
f5ce8cd93f
commit
1fb6935d81
5
ip.rkt
5
ip.rkt
|
@ -183,11 +183,6 @@
|
||||||
(spawn (lambda (e s)
|
(spawn (lambda (e s)
|
||||||
(match e
|
(match e
|
||||||
[(routing-update g)
|
[(routing-update g)
|
||||||
(log-info "normal-ip route ~v/~v/~v quitting:\n~a"
|
|
||||||
network
|
|
||||||
netmask
|
|
||||||
interface-name
|
|
||||||
(gestalt->pretty-string g))
|
|
||||||
(transition s (when (gestalt-empty? g) (quit)))]
|
(transition s (when (gestalt-empty? g) (quit)))]
|
||||||
[(message (ethernet-packet _ _ _ _ _ body) _ _)
|
[(message (ethernet-packet _ _ _ _ _ body) _ _)
|
||||||
(define p (parse-ip-packet interface-name body))
|
(define p (parse-ip-packet interface-name body))
|
||||||
|
|
Loading…
Reference in New Issue