Constructing TH types
Eric M. Pashman
eric.pashman at gmail.com
Sun Oct 7 19:14:53 CEST 2012
Whoops, sorry for the bad code in my last message. I mean of course that the problem is that
ConT (mkName "[]") /= ListT
Regards,
Eric
On Oct 7, 2012, at 12:08 , Eric M. Pashman <eric.pashman at gmail.com> wrote:
> Nicolas,
>
> Intended usage seems to be something like
>
> AppT ListT $ ConT . mkName $ "Int"
>
> That works. So it seems that there is indeed no way to construct the syntactically special list type from its (valid) name, but it can easily be done as above.
>
> In my opinion, it should be possible to do what we've been trying -- ConT (mkName "[]") `AppT` ConT "Char" -- or whatever. The problem seems simply to be that
>
> ConT . mkName $ "[]" \= ListT
>
> I don't know the first thing about the GHC source, but I would imagine that's easily fixable if the behavior we both expected is more broadly desired.
>
> Regards,
>
> Eric
>
> On Oct 7, 2012, at 11:24 , Nicolas Frisby <nicolas.frisby at gmail.com> wrote:
>
>> The issue you had with applications of the [] type seems to be more
>> insidious than my last email made it out to be. This expression
>>
>> ( $(return $ ConE (mkName "[]")) ::
>> $(return $ ConT (mkName "[]") `AppT` ConT ''Char)
>> )
>>
>> fails with "[] is applied to too many arguments". I'm thinking that
>> the "[]" in the type is being resolved somehow to the the [] data
>> constructor, not the [] type constructor.
>>
>> This seems specific to []; the following works for tuples, even though
>> the data and type constructor also share a string name.
>>
>> $(return $ ConE (mkName "(,)") `AppE` LitE (CharL 'c') `AppE` LitE
>> (CharL 'a')) ::
>> $(return $ ConT (mkName "(,)") `AppT` ConT ''Char `AppT` ConT ''Char)
>>
>> I haven't yet narrowed down where the mkName'd string is
>> (inappropriately?) resolved in the GHC source.
>>
>> Eric, special-casing for ArrowT probably avoids this problem for you.
>> The only thing to glean from this email is that you ideally wouldn't
>> need to worry about the special-casing for your current application —
>> I think there's a TH bug at play, though I haven't found an open GHC
>> ticket for it and it may very well still be a known issue.
>>
>> On Sun, Oct 7, 2012 at 10:15 AM, Eric M. Pashman <eric.pashman at gmail.com> wrote:
>>> Nicolas, thanks for the welcome, and thanks for pointing out the additional 'Type' constructors!
>>>
>>> I'd looked over the available constructors, but apparently not very well. The 'ListT', 'TupleT', 'ArrowT', etc., constructors are precisely what I need to make this work in a straightforward fashion.
>>>
>>> So I don't actually have a problem making the right 'Name' value, just a problem reading the TH source. Well, that's that. ...
>>>
>>> Many thanks,
>>>
>>> Eric
>>
>> My pleasure.
>>
>> However,
>
More information about the Glasgow-haskell-users
mailing list