diff options
Diffstat (limited to 'testsuite/tests/ghc-regress/ghci.debugger/scripts/TupleN.hs')
-rw-r--r-- | testsuite/tests/ghc-regress/ghci.debugger/scripts/TupleN.hs | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/testsuite/tests/ghc-regress/ghci.debugger/scripts/TupleN.hs b/testsuite/tests/ghc-regress/ghci.debugger/scripts/TupleN.hs deleted file mode 100644 index 528f0ea238..0000000000 --- a/testsuite/tests/ghc-regress/ghci.debugger/scripts/TupleN.hs +++ /dev/null @@ -1,10 +0,0 @@ -module TupleN where -import Language.Haskell.TH - -tuple :: Int -> ExpQ -tuple n = [|\list -> $(tupE (exprs [|list|])) |] - where - exprs list = id [infixE (Just (list)) - (varE '(!!)) - (Just (litE $ integerL (toInteger num))) - | num <- [0..(n - 1)]]
\ No newline at end of file |