1.0.21.36: Fix a bug in one path through RUN-PROGRAM.

* Ensure that the template buffer for sb_mkstemp is null-terminated.

diff --git a/src/code/unix.lisp b/src/code/unix.lisp
index 368665e..0a25f7b 100644 (file)
--- a/src/code/unix.lisp
+++ b/src/code/unix.lisp
@@ -190,7 +190,7 @@ corresponds to NAME, or NIL if there is none."
 (defun sb-mkstemp (template-string mode)
   (declare (type string template-string)
            (type unix-file-mode mode))
-  (let ((template-buffer (string-to-octets template-string)))
+  (let ((template-buffer (string-to-octets template-string :null-terminate t)))
     (with-pinned-objects (template-buffer)
       (let ((fd (alien-funcall (extern-alien "sb_mkstemp"
                                              (function int (* char) int))

diff --git a/version.lisp-expr b/version.lisp-expr
index a713ab6..fe89250 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.21.35"
+"1.0.21.36"