Repositories / ecl.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: ad9fafa)
trace: improve warning message
authorDaniel Kochmański <daniel@turtleware.eu>
Sun, 9 Aug 2015 08:53:42 +0000 (10:53 +0200)
committerDaniel Kochmański <daniel@turtleware.eu>
Sun, 9 Aug 2015 08:53:42 +0000 (10:53 +0200)
Signed-off-by: Daniel Kochmański <daniel@turtleware.eu>
src/lsp/trace.lsp patch | blob | blame | history

diff --git a/src/lsp/trace.lsp b/src/lsp/trace.lsp
index 4112442..a5c4954 100644 (file)
--- a/src/lsp/trace.lsp
+++ b/src/lsp/trace.lsp
@@ -107,7 +107,7 @@ all functions."
         (cond ((traced-and-redefined-p record)
                (delete-from-trace-list fname))
               (t
-               (warn "The function ~S is already traced." fname)
+               (warn "The function ~S is already traced. Statement has no effect." fname)
                (return-from trace-one nil)))))
     (setq oldf (fdefinition fname))
     (eval
Embeddable Common Lisp (Official: https://gitlab.com/embeddable-common-lisp/ecl)