Provide run for ad-hoc testing
This commit is contained in:
parent
f9585b7cbb
commit
4e031e7278
|
@ -5,6 +5,8 @@
|
||||||
(require minimart)
|
(require minimart)
|
||||||
(require logbook)
|
(require logbook)
|
||||||
|
|
||||||
|
(provide run)
|
||||||
|
|
||||||
(struct ping (src dst timestamp) #:transparent)
|
(struct ping (src dst timestamp) #:transparent)
|
||||||
|
|
||||||
(define (send-ping src dst)
|
(define (send-ping src dst)
|
||||||
|
|
Loading…
Reference in New Issue