diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2018-04-08 07:24:11 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2018-04-08 07:24:11 -0700 |
| commit | c02a785e184433ce9b5a14239f29704831a2c95c (patch) | |
| tree | 2bd1b98ebaabd0c7832d79f51dcb616d118165ec /tests/005/query-1.txr | |
| parent | 82e668def2120b1f00fadd9b5d89c45a3fb54467 (diff) | |
| download | txr-c02a785e184433ce9b5a14239f29704831a2c95c.tar.gz txr-c02a785e184433ce9b5a14239f29704831a2c95c.tar.bz2 txr-c02a785e184433ce9b5a14239f29704831a2c95c.zip | |
trace: bugfix: redefine check mustn't throw exceptions.
* share/txr/stdlib/trace.tl (sys:trace-canonicalize-name):
Don't call static-slot-home on something that might not be a
struct type symbol. Otherwise the trace module will throw
whenever some lookup is performed for a non-existent
method. That means that when trace is loaded, it is impossible
to define a method with defun.
Diffstat (limited to 'tests/005/query-1.txr')
0 files changed, 0 insertions, 0 deletions