unofficial mirror of guile-devel@gnu.org 
 help / color / mirror / Atom feed
* guile 2.1.7 skips while condition
@ 2017-03-09 14:31 Arne Babenhauserheide
  2017-03-10 11:14 ` Andy Wingo
  0 siblings, 1 reply; 8+ messages in thread
From: Arne Babenhauserheide @ 2017-03-09 14:31 UTC (permalink / raw)
  To: guile-devel

Hi,

I have a file in which guile 2.1.7 runs a loop like the following

    (while (not (eof-object? nextchar))
           (write (eof-object? nextchar))
           (set! nextchar (read-char)) ...)

But ends with #<eof>. Guile 2.0 does not show the #<eof>.

However I did not manage to reproduce it in a small example, therefore I
pastebinned the whole file:

script: https://paste.pound-python.org/show/0IlalBrxVH7KHjW83ayu/
input: https://paste.pound-python.org/show/ZxQsazFfwVrvz9f4SU4f/

The file has some added debug output (hence the #f#f#f ... in the output below)

call: guile script input

This results in the error:

$ wget -O script https://paste.pound-python.org/raw/0IlalBrxVH7KHjW83ayu/
$ wget -O input https://paste.pound-python.org/raw/ZxQsazFfwVrvz9f4SU4f/
$ guile script input
;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
;;;       or pass the --no-auto-compile argument to disable.
;;; compiling /tmp/script
;;; compiled /home/arne/.cache/guile/ccache/2.2-LE-8-3.9/tmp/script.go
#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#tBacktrace:
9 (apply-smob/1 #<catch-closure 715020>)
In ice-9/boot-9.scm:
713:2  8 (call-with-prompt _ _ #<procedure default-prompt-handle…>)
In ice-9/eval.scm:
608:8  7 (_ #(#(#<directory (guile-user) 7c96c0>)))
In ice-9/boot-9.scm:
2346:4  6 (save-module-excursion _)
3850:12  5 (_)
In /tmp/script:
831:17  4 (_)
816:20  3 (wisp2lisp _)
389:24  2 (linestoindented _)
364:57  1 (splitindent #<input: string 8b0150>)
In unknown file:
0 (string #<eof>)

ERROR: In procedure string:
ERROR: In procedure string: Wrong type (expecting character): #<eof>


while Guile 2.0 works:

$ guile-2.0 script input
;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
;;;       or pass the --no-auto-compile argument to disable.
;;; compiling /tmp/script
;;; compiled /home/arne/.cache/guile/ccache/2.0-LE-8-2.0/tmp/script.go
#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f#f; Test linebreaks in strings and brackets

"flubbub

flabbab"

(hrug (nadda
       madda gadda "shoktom
 mee"  " sep  
ka"
 hadda)
      (gom))

(flu)

(sum [foo
      bar] barz {1 + [* 2 2]})

(mara {
       li
       +
       lo - (mabba)
       })

Best wishes,
Arne



^ permalink raw reply	[flat|nested] 8+ messages in thread

end of thread, other threads:[~2017-03-14 16:51 UTC | newest]

Thread overview: 8+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2017-03-09 14:31 guile 2.1.7 skips while condition Arne Babenhauserheide
2017-03-10 11:14 ` Andy Wingo
2017-03-11 16:38   ` Arne Babenhauserheide
2017-03-13 17:09     ` Arne Babenhauserheide
2017-03-13 19:49       ` Andy Wingo
2017-03-13 20:35       ` Andy Wingo
2017-03-13 21:20       ` Andy Wingo
2017-03-14 16:51         ` Arne Babenhauserheide

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).