[("tests/examples/Pragma4.hs:1:1: Error: Use better pragmas\nFound:\n {-# OPTIONS_GHC -fglasgow-exts #-}\nWhy not:\n {-# LANGUAGE ForeignFunctionInterface, UnliftedFFITypes, GADTs,\n ImplicitParams, ScopedTypeVariables, UnboxedTuples,\n TypeSynonymInstances, StandaloneDeriving, DeriveDataTypeable,\n FlexibleContexts, FlexibleInstances, ConstrainedClassMethods,\n MultiParamTypeClasses, FunctionalDependencies, MagicHash,\n PolymorphicComponents, ExistentialQuantification, UnicodeSyntax,\n PostfixOperators, PatternGuards, LiberalTypeSynonyms, RankNTypes,\n ImpredicativeTypes, TypeOperators, RecursiveDo, ParallelListComp,\n EmptyDataDecls, KindSignatures, GeneralizedNewtypeDeriving,\n TypeFamilies #-}\n",[ModifyComment {pos = SrcSpan {startLine = 1, startCol = 1, endLine = 1, endCol = 35}, newComment = "{-# LANGUAGE ForeignFunctionInterface #-}\n{-# LANGUAGE UnliftedFFITypes #-}\n{-# LANGUAGE GADTs #-}\n{-# LANGUAGE ImplicitParams #-}\n{-# LANGUAGE ScopedTypeVariables #-}\n{-# LANGUAGE UnboxedTuples #-}\n{-# LANGUAGE TypeSynonymInstances #-}\n{-# LANGUAGE StandaloneDeriving #-}\n{-# LANGUAGE DeriveDataTypeable #-}\n{-# LANGUAGE FlexibleContexts #-}\n{-# LANGUAGE FlexibleInstances #-}\n{-# LANGUAGE ConstrainedClassMethods #-}\n{-# LANGUAGE MultiParamTypeClasses #-}\n{-# LANGUAGE FunctionalDependencies #-}\n{-# LANGUAGE MagicHash #-}\n{-# LANGUAGE PolymorphicComponents #-}\n{-# LANGUAGE ExistentialQuantification #-}\n{-# LANGUAGE UnicodeSyntax #-}\n{-# LANGUAGE PostfixOperators #-}\n{-# LANGUAGE PatternGuards #-}\n{-# LANGUAGE LiberalTypeSynonyms #-}\n{-# LANGUAGE RankNTypes #-}\n{-# LANGUAGE ImpredicativeTypes #-}\n{-# LANGUAGE TypeOperators #-}\n{-# LANGUAGE RecursiveDo #-}\n{-# LANGUAGE ParallelListComp #-}\n{-# LANGUAGE EmptyDataDecls #-}\n{-# LANGUAGE KindSignatures #-}\n{-# LANGUAGE GeneralizedNewtypeDeriving #-}\n{-# LANGUAGE TypeFamilies #-}"}])]