1
1
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:
Rob Rix 2017-05-19 12:15:03 -04:00
parent aff60ae06a
commit b8d3c26759

View File

@ -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 ".").