From cda3875d8bb45ee79dd957413d75f4fb5f721ab8 Mon Sep 17 00:00:00 2001
From: Francis Russell <francis@unchartedbackwaters.co.uk>
Date: Tue, 18 Sep 2012 21:45:12 +0100
Subject: [PATCH] Reformat a data declaration.

---
 src/TopLevel.hs | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/TopLevel.hs b/src/TopLevel.hs
index d941519..e58c196 100644
--- a/src/TopLevel.hs
+++ b/src/TopLevel.hs
@@ -48,9 +48,14 @@ instance OFLKeyword IndexType where
   toOFLString indexType = show indexType
 
 -- The symbol table
-data SymbolType = ValueTag BaseType [IndexType] | IndexTag IndexType deriving Show
+data SymbolType = 
+  ValueTag BaseType [IndexType] | 
+  IndexTag IndexType 
+  deriving Show
+
 type SymbolTable = Map String SymbolType
 type MappingTable = Map String TargetType
+
 data OFL = OFL {
   symbols :: SymbolTable,
   assignments :: [Assignment],
-- 
2.47.3