diff --git a/src/Search/Search.hs b/src/Search/Search.hs index 4b1b64d99849f2cf89ea4b9306232ba300c67eb9..e173e24cbde07a58dbe9bb650241ff5b01aed9b3 100644 --- a/src/Search/Search.hs +++ b/src/Search/Search.hs @@ -31,7 +31,7 @@ data Vertex = Vertex } instance Eq Vertex where - Vertex x meta1 == Vertex y meta2 = (x, metaSyscall meta1) == (x, metaSyscall meta2) + Vertex x meta1 == Vertex y meta2 = (x, metaSyscall meta1) == (y, metaSyscall meta2) instance Ord Vertex where compare (Vertex x meta1) (Vertex y meta2) = compare (x, metaSyscall meta1) (y, metaSyscall meta2)