mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00
Code Activity

* genio.c: Possible typos str_data -> wstr_data. ???

Browse source 
* genio.c: Possibly unintended shadowing of local variable
`int c' (gotos out of scope of inner `c'). ???
This commit is contained in:
Jim Blandy 1996-09-11 20:27:32 +00:00
parent f1cf98fea1
commit 47ce0f920e
1 changed files with 2 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
libguile/genio.c
View file

@ -234,7 +234,7 @@ scm_gen_puts (rep, str_data, port)
{ {
xwchar_t * wstr_data; xwchar_t * wstr_data;
wstr_data = (xwchar_t *)wstr_data; wstr_data = (xwchar_t *) str_data;
switch (SCM_PORT_REPRESENTATION (port)) switch (SCM_PORT_REPRESENTATION (port))
{ {
case scm_regular_port: case scm_regular_port:
@ -351,7 +351,7 @@ scm_gen_write (rep, str_data, nitems, port)
{ {
xwchar_t * wstr_data; xwchar_t * wstr_data;
wstr_data = (xwchar_t *)wstr_data; wstr_data = (xwchar_t *) str_data;
switch (SCM_PORT_REPRESENTATION (port)) switch (SCM_PORT_REPRESENTATION (port))
{ {
case scm_regular_port: case scm_regular_port:
@ -464,7 +464,6 @@ scm_gen_getc (port)
{ {
int x; int x;
unsigned char buf[256]; unsigned char buf[256];
int c;
SCM_ASSERT (XMB_CUR_MAX < sizeof (buf), SCM_BOOL_F, SCM_ASSERT (XMB_CUR_MAX < sizeof (buf), SCM_BOOL_F,
"huge translation", "scm_gen_puts"); "huge translation", "scm_gen_puts");