summaryrefslogtreecommitdiff
path: root/libguile/mallocs.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-04-17 09:15:39 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-04-17 09:15:39 +0000
commit216eedfcae5e85c8bad8b1138d6e947ab1c67fa1 (patch)
tree9a7ef0273b5adb06080c78175acc7dd9e5c6cea2 /libguile/mallocs.c
parentac16426b15644eed9948b38b0e06824096d7b3d4 (diff)
downloadguile-216eedfcae5e85c8bad8b1138d6e947ab1c67fa1.tar.gz
* Incorporated fixes to interrupt deferring/allowing from Niibe.
* Added SCM_DEBUG_INTERRUPTS as a debugging option.
Diffstat (limited to 'libguile/mallocs.c')
-rw-r--r--libguile/mallocs.c7
1 files changed, 2 insertions, 5 deletions
diff --git a/libguile/mallocs.c b/libguile/mallocs.c
index 035539f9b..1874f3bde 100644
--- a/libguile/mallocs.c
+++ b/libguile/mallocs.c
@@ -1,5 +1,5 @@
/* classes: src_files
- * Copyright (C) 1995, 1997, 1998, 2000 Free Software Foundation, Inc.
+ * Copyright (C) 1995,1997,1998,2000,2001 Free Software Foundation, Inc.
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
@@ -64,10 +64,7 @@ scm_malloc_obj (scm_sizet n)
{
scm_bits_t mem = n ? (scm_bits_t) malloc (n) : 0;
if (n && !mem)
- {
- SCM_ALLOW_INTS;
- return SCM_BOOL_F;
- }
+ return SCM_BOOL_F;
SCM_RETURN_NEWSMOB (scm_tc16_malloc, mem);
}