From f88705ea81859f96082d6e1611a3690f1a1742a4 Mon Sep 17 00:00:00 2001 From: Sergiu Ivanov Date: Mon, 24 May 2021 21:15:18 +0200 Subject: [PATCH] Fix the tests, once again. --- graph.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/graph.rkt b/graph.rkt index dbd81f4..a79f8b9 100644 --- a/graph.rkt +++ b/graph.rkt @@ -245,7 +245,7 @@ (test-case "4 Basic Graph Functions" ;; 4.1 Breadth-first Search (define-values (bfs-lens bfs-tree) (bfs (directed-graph '((a b) (b c))) 'a)) - (check-equal? (hash->ordered-list bfs-lens) '((c . 2) (a . 0) (b . 1))) + (check-equal? (hash->ordered-list bfs-lens) '((a . 0) (b . 1) (c . 2))) (check-equal? (hash->ordered-list bfs-tree) '((a . #f) (b . a) (c . b)))) (test-case "10 Graphviz"