(tagged-literal t f) compared by identity, so two equal tagged literals were not = and didn't dedup as map keys / set members; JVM's TaggedLiteral is value-equal. Add a register-eq-arm! for jtagged (tag + recursive form); hash is already structural. Fixes an infinite loop in any fixpoint that dedups structures containing tagged literals (e.g. aero's #ref expansion). |
||
|---|---|---|
| .. | ||
| chez | ||