From a40fb0183951b75ea4aafce8487a70f1af25beda Mon Sep 17 00:00:00 2001
From: Tony Garnock-Jones <tonygarnockjones@gmail.com>
Date: Sat, 20 Oct 2018 21:47:47 +0100
Subject: [PATCH] Nope, unsafe-struct-ref is still not measurably faster than
 the safe variants

---
 imperative/skeleton.rkt | 1 -
 1 file changed, 1 deletion(-)

diff --git a/imperative/skeleton.rkt b/imperative/skeleton.rkt
index 95c81e9..6c37da3 100644
--- a/imperative/skeleton.rkt
+++ b/imperative/skeleton.rkt
@@ -262,7 +262,6 @@
       (define old-top (car popped-stack))
       (define new-top
         (cond [(non-object-struct? old-top) (vector-ref (struct->vector old-top) (+ index 1))]
-              ;; ^ TODO: evaluate unsafe-struct-ref
               [(list? old-top) (list-ref old-top index)]
               [(vector? old-top) (vector-ref old-top index)]))
       (define entry (hash-ref table