]> git.unchartedbackwaters.co.uk Git - francis/ofc.git/commitdiff
Reformat a data declaration.
authorFrancis Russell <francis@unchartedbackwaters.co.uk>
Tue, 18 Sep 2012 20:45:12 +0000 (21:45 +0100)
committerFrancis Russell <francis@unchartedbackwaters.co.uk>
Tue, 18 Sep 2012 20:45:12 +0000 (21:45 +0100)
src/TopLevel.hs

index d941519a647a6963c16ee5edd59bbed201e1ab78..e58c196e29248bc8d01ae7369cb614b13be7eadc 100644 (file)
@@ -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],