GOOPS: Statically allocate the SMOB class array.
authorLudovic Courtès <ludo@gnu.org>
Sun, 18 Jan 2009 15:53:01 +0000 (16:53 +0100)
committerLudovic Courtès <ludo@gnu.org>
Sun, 18 Jan 2009 15:53:01 +0000 (16:53 +0100)
commit474554694f5618be238054e736540f567a0e02a0
treecb34656af70ce89e34c439fbff6f2433d6b15551
parentc891a40e9fc5f718bfaf6e70f8fd0b19311d14a6
GOOPS: Statically allocate the SMOB class array.

* libguile/goops.c (scm_smob_class): Statically allocate it.
  (create_smob_classes): Don't malloc(3) `scm_smob_class'.

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

* libguile/smob.c (scm_make_smob_type, scm_set_smob_apply): When
  checking whether GOOPS is initialized, check whether the first element
  of SCM_SMOB_CLASS is non-zero.
libguile/goops.c
libguile/goops.h
libguile/smob.c