Raymond Toy pushed to branch master at cmucl / cmucl

Commits:

• 70889867
  by Raymond Toy at 2026-04-30T21:51:21-07:00

  Fix #496:  Fix undefined var in with-temporary-file
  

• 2e1198bc
  by Raymond Toy at 2026-04-30T21:51:21-07:00

  Merge branch 'issue-496-with-temp-file-undefined-var' into 'master'
  
  Fix #496:  Fix undefined var in with-temporary-file
  
  Closes #496
  
  See merge request cmucl/cmucl!372

1 changed file:

• src/code/extensions.lisp

Changes:

 	(file-template (gensym "TEMP-PATH-"))

 	(unique-filename (gensym "UNIQUE-FILENAME-")))

     `(let ((,file-template (create-template ,directory ,prefix))

-	   ,unique-filename)

+	   ,unique-filename

+	   ,filename)

        (unwind-protect

 	    (let (,fd)

 	      (multiple-value-setq (,fd ,unique-filename)