Replace deprecated pragma with up-to-date one. (#17)

This commit is contained in:
Inari Listenmaa
2020-08-03 19:45:20 +02:00
parent 868566a319
commit 7c478016d0

View File

@@ -44,7 +44,7 @@ grammar2haskell opts name gr = foldr (++++) [] $
| otherwise = ("G"++) . rmForbiddenChars
-- GF grammars allow weird identifier names inside '', e.g. 'VP/Object'
rmForbiddenChars = filter (`notElem` "'!#$%&*+./<=>?@\\^|-~")
pragmas | gadt = ["{-# OPTIONS_GHC -fglasgow-exts #-}","{-# LANGUAGE GADTs #-}"]
pragmas | gadt = ["{-# LANGUAGE GADTs, FlexibleInstances, KindSignatures, RankNTypes, TypeSynonymInstances #-}"]
| dataExt = ["{-# LANGUAGE DeriveDataTypeable #-}"]
| otherwise = []
derivingClause