Added hoogle for local hoogling, reordered imports

This commit is contained in:
VegOwOtenks 2025-02-16 21:32:02 +01:00
parent c12458a2bf
commit e013a8a186
5 changed files with 18 additions and 5 deletions

View file

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

View file

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

View file

@ -40,6 +40,8 @@ packages:
# commit: e7b331f14bcffb8367cd58fbfc8b40ec7642100a # commit: e7b331f14bcffb8367cd58fbfc8b40ec7642100a
# #
# extra-deps: [] # extra-deps: []
extra-deps:
- hoogle-5.0.18.4
# Override default flag values for project packages and extra-deps # Override default flag values for project packages and extra-deps
# flags: {} # flags: {}

View file

@ -3,5 +3,12 @@
# For more information, please see the documentation at: # For more information, please see the documentation at:
# https://docs.haskellstack.org/en/stable/topics/lock_files # https://docs.haskellstack.org/en/stable/topics/lock_files
packages: [] packages:
- completed:
hackage: hoogle-5.0.18.4@sha256:aaf0274da7de4e31ade69ad09f57a59ee25b3765cd102e631629850521754984,3333
pantry-tree:
sha256: 62d0ccb848ecd2b8f29dc782e3d0a9bde57fa626f09e800822229965728f476c
size: 3414
original:
hackage: hoogle-5.0.18.4
snapshots: [] snapshots: []

View file

@ -30,6 +30,7 @@ library
Ubc.Parse.Syntax.Expression Ubc.Parse.Syntax.Expression
Ubc.Parse.Syntax.File Ubc.Parse.Syntax.File
Ubc.Parse.Syntax.Function Ubc.Parse.Syntax.Function
Ubc.Parse.Syntax.Import
Ubc.Parse.Syntax.Language Ubc.Parse.Syntax.Language
Ubc.Parse.Syntax.Operators Ubc.Parse.Syntax.Operators
Ubc.Parse.Syntax.Statement Ubc.Parse.Syntax.Statement