HCoop
/
bpt
/
guile.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
f0d1cf6
)
(scm_input_error): Pass arg list parameter to scm_error_scm,
author
Kevin Ryde
<user42@zip.com.au>
Wed, 4 Jun 2003 16:36:03 +0000
(16:36 +0000)
committer
Kevin Ryde
<user42@zip.com.au>
Wed, 4 Jun 2003 16:36:03 +0000
(16:36 +0000)
rather than SCM_EOL. Needed by "Unknown # object" case in scm_lreadr.
libguile/read.c
patch
|
blob
|
blame
|
history
diff --git
a/libguile/read.c
b/libguile/read.c
index
ed32c4c
..
583c146
100644
(file)
--- a/
libguile/read.c
+++ b/
libguile/read.c
@@
-1,4
+1,5
@@
-/* Copyright (C) 1995,1996,1997,1999,2000,2001 Free Software Foundation, Inc.
+/* Copyright (C) 1995,1996,1997,1999,2000,2001,2003 Free Software
+ * Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
@@
-90,7
+91,7
@@
scm_input_error(char const * function,
scm_error_scm (scm_str2symbol ("read-error"),
scm_makfrom0str (function),
string,
-
SCM_EOL
,
+
arg
,
SCM_BOOL_F);
}