From 1205836986eafaa3c74fed0acca7fb7132c0eb3c Mon Sep 17 00:00:00 2001 From: Joachim Fasting Date: Wed, 19 Sep 2007 23:54:36 +0200 Subject: Rolodex.hs: add missing type signature. div' is only used with Dimension, used Integral to keep it general. darcs-hash:20070919215436-928c4-5bdedd2e9a0154510e5d029eba05a45e3ec6acb8.gz --- Roledex.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'Roledex.hs') diff --git a/Roledex.hs b/Roledex.hs index 02eecf8..89c0f24 100644 --- a/Roledex.hs +++ b/Roledex.hs @@ -62,5 +62,6 @@ roledexLayout sc ws = return ([(W.focus ws, mainPane)] ++ then (n - 1) : (cd (n-1) m) else [] +div' :: Integral a => a -> a -> a div' _ 0 = 0 div' n o = div n o -- cgit v1.2.3