GNU bug report logs -
#38628
Character literals unsupported in source 'snippets'
Previous Next
Reported by: Marius Bakke <mbakke <at> fastmail.com>
Date: Sun, 15 Dec 2019 20:28:01 UTC
Severity: normal
Done: Marius Bakke <mbakke <at> fastmail.com>
Bug is archived. No further changes may be made.
Full log
View this message in rfc822 format
Hi Marius,
Marius Bakke <mbakke <at> fastmail.com> skribis:
> Marius Bakke <mbakke <at> fastmail.com> writes:
>
>> Ludovic Courtès <ludo <at> gnu.org> writes:
>>
>>> Also it would be nice to add a tiny test close to the one that
>>> 24ab804ce11fe12ff49cd144a3d9c4bfcf55b41c added.
>>
>> Good idea. I came up with this:
>>
>> diff --git a/tests/gexp.scm b/tests/gexp.scm
>> index 84c16422c2..8b1596f66d 100644
>> --- a/tests/gexp.scm
>> +++ b/tests/gexp.scm
>> @@ -886,6 +886,12 @@
>> (run-with-store %store
>> (lower-gexp #~(foo #$+)))))
>>
>> +(test-equal "lower-gexp, character literal"
>> + '(#\+)
>> + (lowered-gexp-sexp
>> + (run-with-store %store
>> + (lower-gexp #~(#\+)))))
>> +
>> (test-assertm "gexp->derivation #:references-graphs"
>> (mlet* %store-monad
>> ((one (text-file "one" (random-text)))
>>
>> WDYT?
>
> I ended up pushing this in ab7010af1f1077c056529769a53a380147c3933f,
> even though I suspect there is an easier test that could reveal this
> problem without involving the store, somewhere. Improvements welcome.
We could have called ‘gexp->sexp’ directly, but we’d still need the
store anyway, so IMO that’s good!
Thanks,
Ludo’.
This bug report was last modified 5 years and 158 days ago.
Previous Next
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.