[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: segfault on scm_object_to_string
From: |
Marius Vollmer |
Subject: |
Re: segfault on scm_object_to_string |
Date: |
24 Oct 2002 21:07:01 +0200 |
User-agent: |
Gnus/5.09 (Gnus v5.9.0) Emacs/21.2 |
Steve Pothier <address@hidden> writes:
> The following code (lifted from a past email) seg faults under
> guile-1.6.0.
It looks like you didn't initialize Guile anywhere. Try this:
#include <stdio.h>
#include <libguile.h>
void
inner_main (void *data, int argc, char **argv)
{
char *str;
size_t len;
SCM scmVal = scm_int2num (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';
printf ("%s\n", str);
}
int
main (int argc, char **argv)
{
scm_boot_guile (argc, argv, inner_main, NULL);
return 0;
}
--
GPG: D5D4E405 - 2F9B BCCC 8527 692A 04E3 331E FAF8 226A D5D4 E405