mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-20 11:40:18 +02:00
Add 'scm_gc_typed_calloc' macro.
* libguile/gc.h (scm_gc_typed_calloc): New macro.
This commit is contained in:
parent
369294866d
commit
663780bb1c
1 changed files with 3 additions and 1 deletions
|
@ -3,7 +3,8 @@
|
||||||
#ifndef SCM_GC_H
|
#ifndef SCM_GC_H
|
||||||
#define SCM_GC_H
|
#define SCM_GC_H
|
||||||
|
|
||||||
/* Copyright (C) 1995,1996,1998,1999,2000,2001, 2002, 2003, 2004, 2006, 2007, 2008, 2009, 2010, 2011 Free Software Foundation, Inc.
|
/* Copyright (C) 1995, 1996, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2006,
|
||||||
|
* 2007, 2008, 2009, 2010, 2011, 2013 Free Software Foundation, Inc.
|
||||||
*
|
*
|
||||||
* This library is free software; you can redistribute it and/or
|
* This library is free software; you can redistribute it and/or
|
||||||
* modify it under the terms of the GNU Lesser General Public License
|
* modify it under the terms of the GNU Lesser General Public License
|
||||||
|
@ -207,6 +208,7 @@ SCM_API char *scm_gc_strdup (const char *str, const char *what)
|
||||||
SCM_API char *scm_gc_strndup (const char *str, size_t n, const char *what)
|
SCM_API char *scm_gc_strndup (const char *str, size_t n, const char *what)
|
||||||
SCM_MALLOC;
|
SCM_MALLOC;
|
||||||
|
|
||||||
|
#define scm_gc_typed_calloc(t) ((t *) scm_gc_calloc (sizeof (t), #t))
|
||||||
|
|
||||||
#ifdef BUILDING_LIBGUILE
|
#ifdef BUILDING_LIBGUILE
|
||||||
#include "libguile/bdw-gc.h"
|
#include "libguile/bdw-gc.h"
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue