guile-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] branch master updated: Fix incorrect allocation size in


From: Ludovic Courtès
Subject: [Guile-commits] branch master updated: Fix incorrect allocation size in 'make-vtable-vtable'.
Date: Mon, 09 Mar 2020 10:36:53 -0400

This is an automated email from the git hooks/post-receive script.

civodul pushed a commit to branch master
in repository guile.

The following commit(s) were added to refs/heads/master by this push:
     new 7c17655  Fix incorrect allocation size in 'make-vtable-vtable'.
7c17655 is described below

commit 7c17655cd3d859bf0c5a86d9782a7788205fc05a
Author: Ludovic Courtès <address@hidden>
AuthorDate: Mon Mar 9 15:09:26 2020 +0100

    Fix incorrect allocation size in 'make-vtable-vtable'.
    
    Fixes <https://bugs.gnu.org/39266>.
    Thanks to <https://rr-project.org/> for its help!
    
    * libguile/struct.c (set_vtable_access_fields): Fix first argument to
    'scm_gc_malloc_pointerless'.
---
 libguile/struct.c | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/libguile/struct.c b/libguile/struct.c
index 3dbcc71..68dcc00 100644
--- a/libguile/struct.c
+++ b/libguile/struct.c
@@ -1,4 +1,4 @@
-/* Copyright 1996-2001,2003-2004,2006-2013,2015,2017-2018
+/* Copyright 1996-2001,2003-2004,2006-2013,2015,2017-2018,2020
      Free Software Foundation, Inc.
 
    This file is part of Guile.
@@ -139,8 +139,10 @@ set_vtable_access_fields (SCM vtable)
   nfields = len / 2;
 
   bitmask_size = (nfields + 31U) / 32U;
-  unboxed_fields = scm_gc_malloc_pointerless (bitmask_size, "unboxed fields");
-  memset (unboxed_fields, 0, bitmask_size * sizeof(*unboxed_fields));
+  unboxed_fields =
+    scm_gc_malloc_pointerless (bitmask_size * sizeof (*unboxed_fields),
+                               "unboxed fields");
+  memset (unboxed_fields, 0, bitmask_size * sizeof (*unboxed_fields));
 
   /* Update FLAGS according to LAYOUT.  */
   for (field = 0; field < nfields; field++)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]