Debugger entered--Lisp error: (error "Value of form marked with ‘1value’ does vary: (message the symbol is %s (quote bar))") signal(error ("Value of form marked with ‘1value’ does vary: (message the symbol is %s (quote bar))")) error("Value of form marked with `1value' does vary: %s" (message "the symbol is %s" (quote bar))) testcover-1value(2 (message "the symbol is %s" (quote bar))) (lambda nil (testcover-1value 2 (list (quote message) "the symbol is %s" (list (quote quote) (testcover-after 1 name)))))() testcover-enter(my-print-symbol (lambda nil (testcover-1value 2 (list (quote message) "the symbol is %s" (list (quote quote) (testcover-after 1 name)))))) (lambda (name) (testcover-enter (quote my-print-symbol) (function (lambda nil (testcover-1value 2 (list (quote message) "the symbol is %s" (list (quote quote) (testcover-after 1 name))))))))(bar) (my-print-symbol bar) (testcover-after 3 (my-print-symbol bar)) (lambda nil (testcover-after 1 (my-print-symbol foo)) (testcover-after 3 (my-print-symbol bar)))() testcover-enter(my-example-2 (lambda nil (testcover-after 1 (my-print-symbol foo)) (testcover-after 3 (my-print-symbol bar)))) my-example-2() eval((my-example-2) nil) eval-expression((my-example-2) nil) funcall-interactively(eval-expression (my-example-2) nil) call-interactively(eval-expression record nil) command-execute(eval-expression record) execute-extended-command(nil "eval-expression" "eval-expression") funcall-interactively(execute-extended-command nil "eval-expression" "eval-expression") call-interactively(execute-extended-command nil nil) command-execute(execute-extended-command)