From 2b233030e58051bae4185e5b46522543cdf56e44 Mon Sep 17 00:00:00 2001
From: Yann Herklotz <ymherklotz@gmail.com>
Date: Tue, 25 Dec 2018 13:24:14 +0100
Subject: Rename Node to Int

---
 src/Test/VeriFuzz/Internal/Gen.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/Test/VeriFuzz/Internal/Gen.hs b/src/Test/VeriFuzz/Internal/Gen.hs
index 2eba531..8f7462b 100644
--- a/src/Test/VeriFuzz/Internal/Gen.hs
+++ b/src/Test/VeriFuzz/Internal/Gen.hs
@@ -16,7 +16,7 @@ import           Data.Graph.Inductive (Graph, Node)
 import qualified Data.Graph.Inductive as G
 import qualified Data.Text            as T
 
-fromNode :: Node -> T.Text
+fromNode :: Int -> T.Text
 fromNode node = T.pack $ "w" <> show node
 
 filterGr :: (Graph gr) => gr n e -> (Node -> Bool) -> [Node]
-- 
cgit