Broken: refactor terminals

2022-07-25 00:45:15 +01:00
parent d1bf49319a
commit d219d8d889
25 changed files with 505 additions and 364 deletions
@@ -12,5 +12,5 @@ data ForegroundShape = ForegroundShape
    , _fsRad :: Float  -- This should probably be a bounding box
    , _fsSPic :: SPic
    }
-  deriving ()
+  deriving (Eq,Ord,Show,Read)
 makeLenses ''ForegroundShape