diff --git a/collects/racket/future/private/visualizer-data.rkt b/collects/racket/future/private/visualizer-data.rkt
index ea498974cf..f6c5103f62 100644
--- a/collects/racket/future/private/visualizer-data.rkt
+++ b/collects/racket/future/private/visualizer-data.rkt
@@ -111,7 +111,7 @@
 
 ;;allocation-event? : event -> bool
 (define (allocation-event? evt) 
-  (equal? (event-prim-name evt) '|[allocate memory|))
+  (equal? (event-prim-name evt) '|[allocate memory]|))
 
 ;;jitcompile-event : event -> bool
 (define (jitcompile-event? evt)