Commit bf516c4e authored by mnislaih's avatar mnislaih
Browse files

Test for debugging code with unlifted values around

parent f35369ce
{-# OPTIONS_GHC -fglasgow-exts #-}
import GHC.Base
f :: Int -> Int# -> Int#
f x i = i
test = let I# i = 3 in I#(f 2 i)
\ No newline at end of file
TOP=../../../..
include $(TOP)/mk/boilerplate.mk
include $(TOP)/mk/test.mk
test('dynbk009', normal, ghci_script, ['dynbk009.script'])
-- Instrumentation should not set breakpoints around unlifted values
:set -fdebugging
:l A.hs
:show breakpoints
test
\ No newline at end of file
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment