Parse error when one cell contains multiple definitions with quasiquotes

[SmartHypercube]

I wish to be able to copy-paste an entire module's code, only stripping the module...where part at the beginning, and run it in one cell. This can greatly help debugging, since I will be able to easily modify it, split it into multiple cells, and re-run any part. However, many of my function definitions contain quasiquotes and currently ihaskell cannot correctly process them.

Steps to reproduce

First cell:

:extension TemplateHaskell

Second cell:

a = [|()|]
b = [|()|]

Expected result

Both cells run without problem.

Actual result

Parse error (line 2, column 3): parse error on input ‘=’

[vaibhavsagar]

Maybe this is a problem with joinQuasiquotes?