mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-14 13:21:54 -08:00
Code Issues Projects Releases Packages Wiki Activity

Remove debug statement from cmpname.lsp

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2009-12-31 10:24:59 +01:00
parent 475af14af3
commit b20cefe9ab
1 changed files with 0 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/new-cmp/cmpname.lsp
View file

@ -103,7 +103,6 @@ the function name it precedes."
(find-init-name pathname))
(error "Cannot find out entry point for binary file ~A" pathname))
(compute-init-name pathname :kind kind)))
(trace guess-init-name find-init-name)
(defun compute-init-name (pathname &key kind)
(let ((filename (pathname-name pathname)))