Make StringPrimL take [Word8]

[reinerp]

This is a follow-up of  PHO's comment on #5218:

---

What concerns me is that there seems no means of creating primitive byte-array literals with TH. That is, the Lit type currently only has a constructor StringPrimL String which represents an Addr# literal encoded in UTF-8, thus unsafePackAddressLen 3 "\NUL\NUL\NUL"# works but unsafePackAddressLen 3 $(litE $ StringPrimL "\NUL\NUL\NUL") doesn't. So we probably need to make a change to the type of StringPrimL:

data Lit = CharL Char
         | StringL String
         | ...
         | StringPrimL [Word8] -- Raw, non-encoded "..."# literal.

---

I attach patches which implement this change.

[reinerp]

Patch for ghc

[reinerp]

Patch for Template Haskell

[reinerp]

Patch for testsuite

[pcapriotti]

Merged to GHC HEAD:

commit ee44e19f20395596fc34f2bce5763fb16032dbd4
Author: Reiner Pope <reiner.pope@gmail.com>
Date:   Thu Feb 16 10:58:07 2012 +1100

    Template Haskell: StringPrimL now takes [Word8]

and template-haskell:

commit 82291b03b45b4a72ed98419e1893cd74c2e420ca
Author: Reiner Pope <reiner.pope@gmail.com>
Date:   Thu Feb 16 10:58:28 2012 +1100

    StringPrimL now takes [Word8]