From e7acfa88bc26e7c22b1053e2c807cd4b737cfb63 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Thu, 15 Oct 2009 01:32:36 +0200
Subject: [PATCH] Use pointer-less memory for `scm_gc_strdup ()'.

* libguile/gc-malloc.c (scm_gc_strndup): Use `GC_MALLOC_ATOMIC ()'
  instead of `GC_MALLOC ()'.
---
 libguile/gc-malloc.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libguile/gc-malloc.c b/libguile/gc-malloc.c
index e48d2cfd1..a96a186bc 100644
--- a/libguile/gc-malloc.c
+++ b/libguile/gc-malloc.c
@@ -236,7 +236,7 @@ scm_gc_free (void *mem, size_t size, const char *what)
 char *
 scm_gc_strndup (const char *str, size_t n, const char *what)
 {
-  char *dst = GC_MALLOC (n+1);
+  char *dst = GC_MALLOC_ATOMIC (n + 1);
   memcpy (dst, str, n);
   dst[n] = 0;
   return dst;