diff options
Diffstat (limited to 'app-forensics/quickfuzz/files/quickfuzz-9999-th-2.11-1.patch')
| -rw-r--r-- | app-forensics/quickfuzz/files/quickfuzz-9999-th-2.11-1.patch | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/app-forensics/quickfuzz/files/quickfuzz-9999-th-2.11-1.patch b/app-forensics/quickfuzz/files/quickfuzz-9999-th-2.11-1.patch deleted file mode 100644 index 436df0e85e35..000000000000 --- a/app-forensics/quickfuzz/files/quickfuzz-9999-th-2.11-1.patch +++ /dev/null @@ -1,22 +0,0 @@ -diff --git a/src/DeriveArbitrary.hs b/src/DeriveArbitrary.hs -index d42b896..fc94945 100644 ---- a/src/DeriveArbitrary.hs -+++ b/src/DeriveArbitrary.hs -@@ -26,7 +26,7 @@ import Data.List.Split - import Data.Maybe - -- Gen - import Language.Haskell.TH --import Language.Haskell.TH.Syntax -+import Language.Haskell.TH.Syntax as TH - import Test.QuickCheck - import GHC.Exts - import GHC.Types -@@ -38,7 +38,7 @@ import Control.Applicative - import Data.List - - -- | Build the arbitrary function with makeArbs --chooseExpQ :: Name -> Name -> Name -> Integer -> Type -> ExpQ -+chooseExpQ :: Name -> Name -> Name -> Integer -> TH.Type -> ExpQ - chooseExpQ g n t bf (AppT ListT ty) = [| listOf $ resize ($(varE n) `div` 10) arbitrary |] - chooseExpQ g n t bf ty | headOf ty /= t = [| resize (max 0 ($(varE n) - 1)) arbitrary |] - chooseExpQ g n t bf ty = |