Skip to content
Snippets Groups Projects
Commit a368525a authored by Kevin Layer's avatar Kevin Layer
Browse files

spr38910: fix select-file for directories on Windows

This patch was lurking in spr38910 since Jan 2012.  Other users (SRI)
have also run into it.

Change-Id: I32cce11ceada64f53f4629618e83cd5c5b2f13dc
parent cb7dcfc4
No related branches found
No related tags found
No related merge requests found
......@@ -2327,9 +2327,11 @@ in a second Lisp process. This frame cannot be reused."
(IMallocFree (pointer-value :nat malloc) item-id-list-out)))))
;; Free the item-id-lists returned from pathname-to-item-id-list.
(when root
(IMallocFree (pointer-value :nat malloc) root-item-id-list))
(IMallocFree (pointer-value :nat malloc)
(pointer-value :nat root-item-id-list)))
(when initial-directory
(IMallocFree (pointer-value :nat malloc) initial-directory-item-id-list))
(IMallocFree (pointer-value :nat malloc)
(pointer-value :nat initial-directory-item-id-list)))
;;
(IMallocRelease (pointer-value :nat malloc)))))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment