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

* ports.c (scm_port_mode): Changed `mode' array size to 4,

avoiding buffer overflow.
This commit is contained in:
Martin Grabmüller 2001-03-13 08:02:02 +00:00
parent fe78b6c096
commit 26a3038db8
2 changed files with 5 additions and 1 deletions

View file

@ -1,3 +1,7 @@
2001-03-13 Martin Grabmueller <mgrabmue@cs.tu-berlin.de>
* ports.c (scm_port_mode): Changed `mode' array size to 4.
2001-03-12 Keisuke Nishida <kxn30@po.cwru.edu>
* strports.c (scm_object_to_string): New procedure.

View file

@ -609,7 +609,7 @@ SCM_DEFINE (scm_port_mode, "port-mode", 1, 0, 0,
"port creation are not retained.")
#define FUNC_NAME s_scm_port_mode
{
char modes[3];
char modes[4];
modes[0] = '\0';
port = SCM_COERCE_OUTPORT (port);