Commit 71babf1f authored by Marius Gerbershagen's avatar Marius Gerbershagen

cmp: prevent spurious error when the compile function fails

parent abf33455
......@@ -829,7 +829,7 @@ after compilation."
(cmp-delete-file h-pathname)
(cmp-delete-file so-pathname)
(mapc 'cmp-delete-file tmp-names)
(let ((output (or name (symbol-value 'GAZONK))))
(let ((output (or name (and (boundp 'GAZONK) (symbol-value 'GAZONK)))))
;; By unsetting GAZONK we avoid spurious references to the
;; loaded code.
(set 'GAZONK nil)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment