Flatten callback nodes

[astlouisf]

Should fix #199

I took the aggressive approach described in #199.

I ran it on our set of translation files and it didn't change anything except for two files that were correctly fixed :)

I left a comment to explain the Callback branch as a lot happen in a single line.

There might be some issues with formatting and general Haskell conventions.