Re: limits for (export ...)

[Ludovic Courtès]

Hi,

Ian Price <address@hidden> skribis:

> Although, and I don't think this is related to your issue, when
> trying out the (list sym0 ...) from the repl, I did get an error
>
> scheme@(guile−user)> (list sym0 sym1 ... sym100 sym101)
> ;;; <stdin>:3:0: warning: possibly unbound variable `sy'
> ;;; <stdin>:3:0: warning: possibly unbound variable `m85'
> <unnamed port>:3:0: In procedure #<procedure a08bf50 at <current input>:3:0 
> ()>:
> <unnamed port>:3:0: In procedure module−lookup: Unbound variable: sy
>
> Entering a new prompt.  Type `,bt' for a backtrace or `,q' to continue.
> scheme@(guile−user) [1]> ,q
>
> But further exploration shows that all the symbols are in fact bound,
> and this error only seems to occur if there is no line break at some
> point after sym8 and before sym85. Presumably, I'm running up against
> some reader limit there.

Weird.  I can’t reproduce it this way:

--8<---------------cut here---------------start------------->8---
scheme@(guile-user)> (use-modules(srfi srfi-1))
scheme@(guile-user)> (define syms (unfold (lambda (i) (> i 1234)) (lambda (i) 
(string->symbol (format #f "sym~a" i))) 1+ 0))
scheme@(guile-user)> (define s (with-output-to-string (lambda () (write syms))))
scheme@(guile-user)> (equal? syms (call-with-input-string s read))
$6 = #t
--8<---------------cut here---------------end--------------->8---

Could you see if you can find a way to reproduce the problem?

Thanks,
Ludo’.