From a7d8051e2e85fbfd67fc5cbfc8f3110cd4776b94 Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Wed, 21 May 2014 23:16:38 -0400 Subject: [PATCH] By setting the initial gestalt to #f, we ensure at least one routing-update gets through. --- minimart/core.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/minimart/core.rkt b/minimart/core.rkt index 739829a..d78ea23 100644 --- a/minimart/core.rkt +++ b/minimart/core.rkt @@ -118,7 +118,7 @@ (define (trigger-guard-process p) (match-define (process _ b s) p) - (struct-copy process p [behavior trigger-guard-handle] [state (trigger-guard (gestalt-empty) b s)])) + (struct-copy process p [behavior trigger-guard-handle] [state (trigger-guard #f b s)])) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; World implementation