segfault on scm_object_to_string

[Steve Pothier]

The following code (lifted from a past email) seg faults under
guile-1.6.0.

Abbreviated stack is:
0x4068f8ba in scm_igc ()
#1  0x40690a4b in scm_must_malloc ()
#2  0x406cc3aa in scm_allocate_string ()
#3  0x406cefee in scm_object_to_string ()
#4  0x080489b2 in main (argc=1, argv=0xbfffeb64) at unused-test.cc:16
16        SCM s_str = scm_object_to_string(scmVal, SCM_UNDEFINED);


I'm running Linux 2.4.18, gcc 3.2.

-sp-


~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

#include <fstream.h>
#include <libguile.h>

int
main(int argc, char *argv[]) 
{
  char *str;
  size_t len;
  SCM scmVal = SCM_MAKINUM(7);
  SCM s_str = scm_object_to_string(scmVal, SCM_UNDEFINED);
  len = SCM_STRING_LENGTH(s_str);
  str = (char *)malloc(len + 1);
  if (!str) abort();
  memcpy(str, SCM_STRING_CHARS(s_str), len);
  str[len] = '\0';
}