diff options
Diffstat (limited to 'testsuite/tests/ghci.debugger/scripts/T17989B.hs')
| -rw-r--r-- | testsuite/tests/ghci.debugger/scripts/T17989B.hs | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/tests/ghci.debugger/scripts/T17989B.hs b/testsuite/tests/ghci.debugger/scripts/T17989B.hs new file mode 100644 index 0000000000..e48067f936 --- /dev/null +++ b/testsuite/tests/ghci.debugger/scripts/T17989B.hs @@ -0,0 +1,13 @@ +module T17989B (foo, bar) where + +foo :: Int -> String +foo n = + let x = "B.foo-" + y = priv n + in x <> y + +bar :: Int -> String +bar n = "B.bar" <> show n + +priv :: Int -> String +priv n = "B.foo-" <> show n |