guile-elisp bootstrap part (C)

[bpt/emacs.git] / src / w32.c

diff --git a/src/w32.c b/src/w32.c
index 4643fc7..76b12ad 100644 (file)
--- a/src/w32.c
+++ b/src/w32.c
@@ -3347,7 +3347,7 @@ sys_opendir (const char *filename)
        return NULL;
     }
 
-  if (!(dirp = (DIR *) malloc (sizeof (DIR))))
+  if (!(dirp = xmalloc (sizeof (DIR))))
     return NULL;
 
   dirp->dd_fd = 0;