When "$arg0 $arg1 ..." is specified, GDB requires that many arguments;
and with "$arg0" it's not possible to give expressions that include
spaces, because they get cut _before_ ecl_eval sees them.
(And having "$arg0" _and_ giving quotes doesn't work as we'd like to, too.)
$39 = t_fixnum
$40 = (ecl_base_char *) 0x42b4000 "10652336"
+And another that helps to see a thread state:
+
+ (gdb) ecl_eval "cl:*package*"
+
+Please note that double quotes have to be escaped:
+
+ (gdb) ecl_eval "(concatenate 'string \"a\" \"b\")"
+
+Both will give a string with "readable" content, and a pretty-printed one.
+
Using VIM:
define ecl_eval
- set $cl_debug_str = ecl_make_simple_base_string( "$arg0", -1)
+ set $cl_debug_str = ecl_make_simple_base_string( $arg0, -1)
set $cl_debug_stream = ecl_make_string_input_stream( $cl_debug_str, 0, ((struct ecl_base_string*)$cl_debug_str)->fillp)
set $cl_debug_form = cl_read(1, $cl_debug_stream)
disable breakpoints
Repositories / ecl.git / commitdiff