Opened 6 years ago

#1102 new defect

Trace and error reporting don't respect *print-length*

Reported by: rongarret Owned by:
Priority: major Milestone:
Component: IDE Version: trunk
Keywords: Cc:

Description

SLSIA:

? (setf *print-length* 5)
5
? (setf l '(1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20))
(1 2 3 4 5 ...)
? (defgeneric foo ())
#<STANDARD-GENERIC-FUNCTION FOO #x30200523DADF>
? (foo l)
> Error: There is no applicable method for the generic function:
>          #<STANDARD-GENERIC-FUNCTION FOO #x30200523DADF>
>        when called with arguments:
>          ((1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20))
> While executing: #<CCL::STANDARD-KERNEL-METHOD NO-APPLICABLE-METHOD (T)>, in process Listener(46).
> Type cmd-/ to continue, cmd-. to abort, cmd-\ for a list of available restarts.
> If continued: Try calling it again
> Type :? for other options.
1 > 
? (defun baz (x) x)
BAZ
? (trace baz)
NIL
? (baz l)
0> Calling (BAZ (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20)) 
<0 BAZ returned (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20)
(1 2 3 4 5 ...)
? 

When dealing with very large structures, printing an error or hitting a trace point can overwhelm the listener and cause the IDE to crash.

Change History (0)

Note: See TracTickets for help on using tickets.