tryBlockQuoteExp :: String -> Q Exp inserts five lines related to exception handling before the user's code.
I've tried to modify it by passing these lines as an extra argument to a variation of C.block, but did not get it to work. It was a hack anyway, because I think tryBlockQuoteExp shouldn't call but one of the internal functions (not inlineItems; that function doesn't seem to have control of the line number either). At least it shouldn't try to reconstruct its code as input to a user-facing function.
tryBlockQuoteExp :: String -> Q Exp
inserts five lines related to exception handling before the user's code.I've tried to modify it by passing these lines as an extra argument to a variation of
C.block
, but did not get it to work. It was a hack anyway, because I thinktryBlockQuoteExp
shouldn't call but one of the internal functions (notinlineItems
; that function doesn't seem to have control of the line number either). At least it shouldn't try to reconstruct its code as input to a user-facing function.