From 783d132f25d80ad7333c373412573126a33b8b82 Mon Sep 17 00:00:00 2001 From: Sam Caldwell Date: Thu, 23 Feb 2017 22:22:43 -0500 Subject: [PATCH] Fix upside-down spawn translations --- racket/syndicate/upside-down.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/racket/syndicate/upside-down.rkt b/racket/syndicate/upside-down.rkt index 1f5005f..f5d855f 100644 --- a/racket/syndicate/upside-down.rkt +++ b/racket/syndicate/upside-down.rkt @@ -54,7 +54,7 @@ this facility for testing. [(patch added removed) (patch (turn-trie-upside-down added) (turn-trie-upside-down removed))] - [(? actor? a) a])) + [(? actor? a) (spawn-upside-down a)])) ;; Event -> Event (define (turn-event-rightside-up e)