summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghci.debugger/scripts/break004.script
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/ghci.debugger/scripts/break004.script')
-rw-r--r--testsuite/tests/ghci.debugger/scripts/break004.script5
1 files changed, 5 insertions, 0 deletions
diff --git a/testsuite/tests/ghci.debugger/scripts/break004.script b/testsuite/tests/ghci.debugger/scripts/break004.script
new file mode 100644
index 0000000000..e4bb16fd1a
--- /dev/null
+++ b/testsuite/tests/ghci.debugger/scripts/break004.script
@@ -0,0 +1,5 @@
+:l ../Test4.hs
+:b f
+seq (f (+(1::Int)) "abc") ()
+-- We can subvert the Unknown machinery this was and pass the string
+-- to the function expecting Int. ToDo: finish this