Updated timeline.rkt render phase explanations

Author: parthrdesai

src/reports/timeline.rkt

@@ -366,10 +366,10 @@
                                   (td (b ,(~a expl)))
                                   (td ,(~a cnt))
                                   (td ,(~a mcnt))
-                                  (td ,(~a safe-locations)))
+                                  (td ,(~a safe-locations))))
                              (for/list ([flow (in-list (or flows '()))])
                                (match-define (list ex type v) flow)
-                               `(tr (td "↳") (td (code ,(~a ex))) (td ,type) (td ,(~a v)))))))))))))
+                               `(tr (td "↳") (td (code ,(~a ex))) (td ,type) (td ,(~a v))))))))))))
 
 
 (define (render-phase-confusion confusion-matrix)

src/utils/timeline.rkt

@@ -226,9 +226,8 @@
                  [expl false]
                  [count +]
                  [mcount +]
-                 [locations (const #f)]
                  [flows (const #f)]
-                 )
+                 [locations (const #f)])
 (define-timeline confusion #:custom (λ (x y) (list (map + (car x) (car y)))))
 (define-timeline total-confusion #:custom (λ (x y) (list (map + (car x) (car y)))))
 (define-timeline maybe-confusion #:custom (λ (x y) (list (map + (car x) (car y)))))