1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-10 22:10:21 +02:00

* gdbint.c: scm_lread now has one more argument.

This commit is contained in:
Mikael Djurfeldt 1996-09-18 19:33:58 +00:00
parent 96937708a9
commit 65fddfc000

View file

@ -228,7 +228,7 @@ gdb_read (str)
/* Read one object */
tok_buf_mark_p = SCM_GC8MARKP (tok_buf);
SCM_CLRGC8MARK (tok_buf);
ans = scm_lreadr (&tok_buf, gdb_input_port, 0, SCM_BOOL_F);
ans = scm_lreadr (&tok_buf, gdb_input_port, 0, SCM_BOOL_F, &ans);
if (SCM_GC_P)
{
if (SCM_NIMP (ans))