Opened 9 years ago
Last modified 3 weeks ago
#287 new defect
Circular structures overflow the stack even though there's a print-object method
| Reported by: | stassats | Owned by: | somebody |
|---|---|---|---|
| Priority: | major | Milestone: | 1.9.0 |
| Component: | other | Version: | 1.3.0-dev |
| Keywords: | Cc: | stassats@… | |
| Parent Tickets: |
Description
(defstruct watch
parent)
(defmethod print-object ((watch watch) stream)
(print-unreadable-object (watch stream :type t)
(format stream "a")))
(defstruct inotify
children)
(defun test ()
(let* ((inotify (make-inotify))
(watch (make-watch :parent inotify)))
(setf (inotify-children inotify) watch)
(write inotify :circle t)
(terpri)
(write inotify)))
(test)
#S(INOTIFY :CHILDREN #<WATCH a>) Maximum error depth exceeded (18 nested errors) with 'Stack overflow.'.
Change History (15)
comment:1 Changed 9 years ago by
| Cc: | stassats@… added |
|---|---|
| Summary: | Circularl structures overflow the stack even though there's a print-object method → Circular structures overflow the stack even though there's a print-object method |
comment:2 Changed 9 years ago by
| Milestone: | → 1.3.0 |
|---|---|
| Version: | → 1.3.0-dev |
comment:3 Changed 8 years ago by
| Milestone: | 1.3.0 → 2.0 |
|---|
comment:5 Changed 8 years ago by
| Milestone: | 2.0.0 → 1.4.0 |
|---|
comment:10 Changed 2 years ago by
| Milestone: | 1.6.2 → 1.7.0 |
|---|
comment:12 Changed 22 months ago by
| Milestone: | 1.7.1 → 1.7.2 |
|---|
Ticket retargeted after milestone closed
comment:14 Changed 19 months ago by
| Milestone: | 1.8.0 → 1.8.1 |
|---|
Ticket retargeted after milestone closed
comment:15 Changed 3 weeks ago by
| Milestone: | 1.8.1 → 1.9.0 |
|---|
Note: See
TracTickets for help on using
tickets.
Ticket retargeted after milestone closed