From b2b0e12c212a40ef2469f77043573b5569ff9e6d Mon Sep 17 00:00:00 2001
From: 3gg <3gg@shellblade.net>
Date: Fri, 10 Mar 2023 09:30:47 -0800
Subject: Minor refactoring and formatting.

---
 Demos/Pong/Pong.hs | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

(limited to 'Demos/Pong/Pong.hs')

diff --git a/Demos/Pong/Pong.hs b/Demos/Pong/Pong.hs
index b048bbc..fd7fbeb 100644
--- a/Demos/Pong/Pong.hs
+++ b/Demos/Pong/Pong.hs
@@ -7,12 +7,12 @@ module Pong
   )
 where
 
-import Data.Monoid (mconcat)
-import GHC.Float (double2Float)
-import Spear.Math.AABB
-import Spear.Math.Spatial2
-import Spear.Math.Vector
-import Spear.Step
+import           Data.Monoid         (mconcat)
+import           GHC.Float           (double2Float)
+import           Spear.Math.AABB
+import           Spear.Math.Spatial2
+import           Spear.Math.Vector
+import           Spear.Step
 
 -- Configuration
 
@@ -42,8 +42,8 @@ data GameEvent
 -- Game objects
 
 data GameObject = GameObject
-  { aabb :: AABB2,
-    obj :: Obj2,
+  { aabb   :: AABB2,
+    obj    :: Obj2,
     gostep :: Step [GameObject] [GameEvent] GameObject GameObject
   }
 
-- 
cgit v1.2.3