GOOPS: Statically allocate the PORT class array.
authorLudovic Courtès <ludo@gnu.org>
Sun, 18 Jan 2009 19:21:44 +0000 (20:21 +0100)
committerLudovic Courtès <ludo@gnu.org>
Sun, 18 Jan 2009 19:21:44 +0000 (20:21 +0100)
commit63385df2fdc2f9bc70804383f071f2fb74743a86
tree90226f6c09f8c5fc0dba2bbeca65b0fbd3af218f
parent0953b549464e5bf1433e7f0b8a49ac4b464c3c11
GOOPS: Statically allocate the PORT class array.

* libguile/goops.c (scm_port_class): Statically allocate it.
  (create_port_classes): Don't use `scm_calloc ()'.

* libguile/goops.h (scm_port_class): Update declaration.

* libguile/ports.c (scm_make_port_type): When checking whether
  GOOPS is initialized, check whether the first element of
  SCM_PORT_CLASS is non-zero.
libguile/goops.c
libguile/goops.h
libguile/ports.c