Debugger entered: nil
  archive-extract-by-stdout("g:/Downloads/Prog/reflector.zip" "\"License.txt\"" ("unzip" "-qq" "-c"))
  (if (member-ignore-case (car archive-zip-extract) (quote ...)) (archive-*-extract archive name archive-zip-extract) (archive-extract-by-stdout archive (if ... ... name) archive-zip-extract))
  archive-zip-extract("g:/Downloads/Prog/reflector.zip" "License.txt")
  funcall(archive-zip-extract "g:/Downloads/Prog/reflector.zip" "License.txt")
  (if (fboundp extractor) (funcall extractor archive ename) (archive-*-extract archive ename (symbol-value extractor)))
  (condition-case err (if (fboundp extractor) (funcall extractor archive ename) (archive-*-extract archive ename ...)) (error (ding ...) nil))
  (let ((coding-system-for-write ...) (coding-system-for-read ...)) (condition-case err (if ... ... ...) (error ... nil)))
  (null (let (... ...) (condition-case err ... ...)))
  (and (null (let ... ...)) just-created)
  (if (and (null ...) just-created) (progn (set-buffer-modified-p nil) (kill-buffer buffer)) (archive-try-jka-compr) (archive-set-buffer-as-visiting-file ename) (goto-char (point-min)) (rename-buffer bufname) (setq buffer-read-only read-only-p) (setq buffer-undo-list nil) (set-buffer-modified-p nil) (setq buffer-saved-size (buffer-size)) (normal-mode) (when (derived-mode-p ...) (setq archive-remote t) (if read-only-p ...) (remove-hook ... ... t)) (run-hooks (quote archive-extract-hooks)) (if archive-read-only (message "Note: altering this archive is not implemented.")))
  (save-current-buffer (set-buffer buffer) (setq buffer-file-name arcfilename) (setq buffer-file-truename (abbreviate-file-name buffer-file-name)) (setq default-directory arcdir) (make-local-variable (quote archive-superior-buffer)) (setq archive-superior-buffer archive-buffer) (add-hook (quote write-file-functions) (quote archive-write-file-member) nil t) (setq archive-subfile-mode descr) (setq archive-file-name-coding-system file-name-coding) (if (and ... just-created) (progn ... ...) (archive-try-jka-compr) (archive-set-buffer-as-visiting-file ename) (goto-char ...) (rename-buffer bufname) (setq buffer-read-only read-only-p) (setq buffer-undo-list nil) (set-buffer-modified-p nil) (setq buffer-saved-size ...) (normal-mode) (when ... ... ... ...) (run-hooks ...) (if archive-read-only ...)))
  (with-current-buffer buffer (setq buffer-file-name arcfilename) (setq buffer-file-truename (abbreviate-file-name buffer-file-name)) (setq default-directory arcdir) (make-local-variable (quote archive-superior-buffer)) (setq archive-superior-buffer archive-buffer) (add-hook (quote write-file-functions) (quote archive-write-file-member) nil t) (setq archive-subfile-mode descr) (setq archive-file-name-coding-system file-name-coding) (if (and ... just-created) (progn ... ...) (archive-try-jka-compr) (archive-set-buffer-as-visiting-file ename) (goto-char ...) (rename-buffer bufname) (setq buffer-read-only read-only-p) (setq buffer-undo-list nil) (set-buffer-modified-p nil) (setq buffer-saved-size ...) (normal-mode) (when ... ... ... ...) (run-hooks ...) (if archive-read-only ...)))
  (if (and buffer (string= ... arcfilename)) nil (setq archive (archive-maybe-copy archive)) (setq bufname (generate-new-buffer-name bufname)) (setq buffer (get-buffer-create bufname)) (setq just-created t) (with-current-buffer buffer (setq buffer-file-name arcfilename) (setq buffer-file-truename ...) (setq default-directory arcdir) (make-local-variable ...) (setq archive-superior-buffer archive-buffer) (add-hook ... ... nil t) (setq archive-subfile-mode descr) (setq archive-file-name-coding-system file-name-coding) (if ... ... ... ... ... ... ... ... ... ... ... ... ... ...)) (archive-maybe-update t))
  (let* ((view-p ...) (descr ...) (ename ...) (iname ...) (archive-buffer ...) (arcdir default-directory) (archive ...) (arcname ...) (bufname ...) (extractor ...) (read-only-p ...) (arcfilename ...) (buffer ...) (just-created nil) (file-name-coding archive-file-name-coding-system)) (if (and buffer ...) nil (setq archive ...) (setq bufname ...) (setq buffer ...) (setq just-created t) (with-current-buffer buffer ... ... ... ... ... ... ... ... ...) (archive-maybe-update t)) (or (not ...) (cond ... ... ... ...)))
  archive-extract(nil return)
  call-interactively(archive-extract nil nil)