1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-24 06:20:43 -08:00

(pp1, pv1): Only print value as expression is now printed out by gud-print.

(pv1): Correct doc string.
This commit is contained in:
Nick Roberts 2006-04-26 23:02:33 +00:00
parent 4a113e3faf
commit 5cd35d2cf0

View file

@ -88,15 +88,13 @@ end
# Print out s-expressions from tool bar
define pp1
set $tmp = $arg0
echo $arg0
printf " = "
set $output_debug = print_output_debug_flag
set print_output_debug_flag = 0
set safe_debug_print ($tmp)
set print_output_debug_flag = $output_debug
end
document pp1
Print the argument as an emacs s-expression
Print the argument as an emacs s-expression.
Works only when an inferior emacs is executing.
For use on tool bar when debugging in Emacs
where the variable name would not otherwise
@ -119,8 +117,6 @@ end
# Print value of lisp variable
define pv1
set $tmp = "$arg0"
echo $arg0
printf " = "
set $output_debug = print_output_debug_flag
set print_output_debug_flag = 0
set safe_debug_print (find_symbol_value (intern ($tmp)))
@ -129,9 +125,8 @@ end
document pv1
Print the value of the lisp variable given as argument.
Works only when an inferior emacs is executing.
For use on tool bar when debugging in Emacs
where the variable name would not otherwise
be recorded in the GUD buffer.
For use when debugging in Emacs where the variable
name would not otherwise be recorded in the GUD buffer.
end
# Print out current buffer point and boundaries