From 014b30b5f2475f89830fadd1eb4d8f9c2056e647 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Krzysztof=20Ko=C5=9Bciuszkiewicz?= Date: Sun, 5 Jun 2011 22:11:35 +0200 Subject: [PATCH] libgeda: smob free functions now return 0 In past guile required to return the size of deallocated memory. Since commit 1735a9e0378290382ec9d0db83c76d039b0c5c7c memory for the smobs is allocated from heap and not from guile memory pool. In such case (and to be compliant with recent guile versions) the free functions must return 0. --- libgeda/src/g_smob.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/libgeda/src/g_smob.c b/libgeda/src/g_smob.c index d3323e045..fadb2d17f 100644 --- a/libgeda/src/g_smob.c +++ b/libgeda/src/g_smob.c @@ -49,7 +49,7 @@ static scm_sizet g_free_attrib_smob(SCM attrib_smob) scm_sizet size = sizeof(struct st_attrib_smob); free(attribute); /* this should stay as free (allocated from guile) */ - return size; + return 0; } /*! \brief Prints attribute smob to port. @@ -464,7 +464,7 @@ static scm_sizet g_free_object_smob(SCM object_smob) scm_sizet size = sizeof(struct st_object_smob); free(object); /* this should stay as free (allocated from guile) */ - return size; + return 0; } /*! \brief Prints object smob to port. @@ -729,7 +729,7 @@ static scm_sizet g_free_page_smob(SCM page_smob) scm_sizet size = sizeof(struct st_page_smob); free(page); /* this should stay as free (allocated from guile) */ - return size; + return 0; } /*! \brief Prints page smob to port. -- 2.11.4.GIT