diff --git a/report.scm b/report.scm
index d3c13da..e447a30 100644
--- a/report.scm
+++ b/report.scm
@@ -27,10 +27,10 @@
     (newline out)
     (display "<th>Test</th>" out)
     (for-each
-      (lambda (implementation)
-        (display (string-append "<th>" (cdr (assoc 'name implementation)) "</th>") out)
+      (lambda (test)
+        (display (string-append "<th>" (cdr (assoc 'name test)) "</th>") out)
         (newline out))
-      implementations)
+      tests)
     (display "</tr>" out)
     (newline out)
     (newline out)