aboutsummaryrefslogtreecommitdiffstats
path: root/Square.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Square.hs')
-rw-r--r--Square.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Square.hs b/Square.hs
index c4c0a05..83ddb6b 100644
--- a/Square.hs
+++ b/Square.hs
@@ -42,7 +42,7 @@ import StackSet ( integrate )
data Square a = Square deriving ( Read, Show )
-instance Layout Square a where
+instance LayoutClass Square a where
pureLayout Square r s = arrange (integrate s)
where arrange ws@(_:_) = map (\w->(w,rest)) (init ws) ++ [(last ws,sq)]
arrange [] = [] -- actually, this is an impossible case