[gambit-list] reading shared structure conforming to SRFI-38
Sven Hartrumpf
hartrumpf at gmx.net
Sat Jul 15 16:27:29 EDT 2017
Hello Marc.
MF wrote, 2017-07-14 16:09:
> You are not using readtable-sharing-allowed?-set properly. It does not mutate the readtable… it creates a new one.
Oh, yes.
The "-set" made me think "-set!". Sorry.
With your suggestion,
the reading problem for shared structures disappeared.
Thanks
Sven
> So you want
>
> (input-port-readtable-set! p (readtable-sharing-allowed?-set (input-port-readtable p) #t))
>
> There is no size limit.
>
> If that doesn’t work, then I can take a look at your “mm” file.
>
> Marc
>
>
>
>> On Jul 14, 2017, at 2:10 PM, Sven Hartrumpf <hartrumpf at gmx.net> wrote:
>>
>> Hi all.
>>
>> The following code cannot read some larger structures conforming
>> to SRFI-38 (gambit 4.8.8).
>> Is there a size limit or similar to be configured?
>>
>>> (define p (open-input-file "mm"))
>>> (define rt (input-port-readtable p))
>>> (readtable-sharing-allowed?-set rt #t)
>>> (define x (read p))
>> *** ERROR IN "mm"@78.25 -- Incomplete form
>>
>> Note that the file mm can be read by
>> 'read' or 'read-with-shared-structure' of other Scheme implementations.
>>
>> If needed, I can send the file mm in a direct mail.
>>
>> Greetings
>> Sven
>> _______________________________________________
>> Gambit-list mailing list
>> Gambit-list at iro.umontreal.ca
>> https://webmail.iro.umontreal.ca/mailman/listinfo/gambit-list
>
More information about the Gambit-list
mailing list