mirror of
https://github.com/github/semantic.git
synced 2024-12-30 10:27:45 +03:00
Revert "Define Language as a GADT."
This reverts commit e5606b132d3ded64a55f3268c978f9adb227fc4b.
This commit is contained in:
parent
aff60ae06a
commit
b8d3c26759
@ -1,4 +1,4 @@
|
||||
{-# LANGUAGE DataKinds, GADTs #-}
|
||||
{-# LANGUAGE DataKinds #-}
|
||||
module Language where
|
||||
|
||||
import Data.Record
|
||||
@ -9,12 +9,12 @@ import qualified Syntax as S
|
||||
import Term
|
||||
|
||||
-- | A programming language.
|
||||
data Language where
|
||||
C :: Language
|
||||
Go :: Language
|
||||
Markdown :: Language
|
||||
Ruby :: Language
|
||||
TypeScript :: Language -- ^ Also JavaScript.
|
||||
data Language =
|
||||
C
|
||||
| Go
|
||||
| Markdown
|
||||
| Ruby
|
||||
| TypeScript -- ^ Also JavaScript.
|
||||
deriving (Show, Eq, Read)
|
||||
|
||||
-- | Returns a Language based on the file extension (including the ".").
|
||||
|
Loading…
Reference in New Issue
Block a user