that was introduced to fix the $ problem:
* expect.scm (expect): call the match proc an extra time at end
of file and set the eof? argument appropriately. call
expect-eof-proc only if the last call didn't match.
* expect.scm (expect-strings): change port to eof? in match proc.
* expect.scm (expect-regexec): take an eof indicator as an argument
instead of a port.
know why it was missing. also don't peek for end of lines
unless expect-strings-exec-flags contains regexp/noteol.
(expect-strings-exec-flags): initialise to regexp/noteol.
(expect-strings): use peek-char to get the next char. this has
the advantage of getting the handling of $ "correct", but the
disadvantage of needing to get (and maybe block for) an extra character
from the port when it may not be needed. hence:
* (expect-strings-exec-flags): new variable/parameter, supplies
flags for regexp-exec. if this includes regexp/noteol, then
automatic regexp/noteol handling (requiring an extra peeked char)
is enabled. default is regexp/noteol.
* (expect-strings-compile-flags): new variable/parameter, supplies
flags for make-regexp. default is regexp/newline.
* * expect.scm (expect): call the match proc with an extra char,
peeked from the stream.
(expect-strings): build a match proc which takes the extra char.
(expect-regexec): take an extra arg "eof-next?" and use it
to decide whether the regexp/noteol flag should be added.
(expect-port, expect-timeout, expect-timeout-proc,
expect-eof-proc, expect-char-proc, expect, expect-strings,
expect-select): Make these public definitions.
(expect-strings): Use make-regexp and regexp-exec, instead of
regcomp and regexec. We've omitted the REG_NEWLINE flag; hope
that's okay.
arithmetic (from Marko.Kohtala@ntc.nokia.com).
* boot-9.scm (open-input-pipe, open-output-pipe): defined here
instead of in libguile.
(tm:sec etc.) new accessors for broken-down time.
(set-tm:sec etc.) new setters for broken-down time.