Added hoogle for local hoogling, reordered imports

src/Ubc/Parse/Syntax/Enumeration.hs

@@ -3,9 +3,11 @@ module Ubc.Parse.Syntax.Enumeration
 , parse
 )
 where
-import qualified Ubc.Parse.Syntax.Language as UbcLanguage
+
 import Text.Parsec (ParsecT, many, (<?>))
 
+import qualified Ubc.Parse.Syntax.Language as UbcLanguage
+
 type EnumerationMember = String
 data Enumeration = Enumeration 
                         { name :: String
@@ -19,5 +21,5 @@ parse = do
         identifier <- UbcLanguage.identifier <?> "enum identifier"
         values <- UbcLanguage.braces $ many UbcLanguage.identifier
 
-        return $ Enumeration identifier values
+        return $! Enumeration identifier values
 

src/Ubc/Parse/Syntax/File.hs

@@ -6,7 +6,10 @@ module Ubc.Parse.Syntax.File
 )
 where
 
+import GHC.Generics (Generic, Generically(..))
+
 import Control.Monad ((<$!>))
+import Data.Functor ((<&>))
 
 import Text.Parsec (choice, ParsecT, many)
 
@@ -19,8 +22,6 @@ import qualified Ubc.Parse.Syntax.Struct as Struct
 import qualified Ubc.Parse.Syntax.Function as Function
 import qualified Ubc.Parse.Syntax.Statement as Statement
 import qualified Ubc.Parse.Syntax.Enumeration as Enumeration
-import GHC.Generics (Generic, Generically(..))
-import Data.Functor ((<&>))
 
 data File = File
         { name :: String