(memql (ash 1 100) (list (ash 1 100))) => nil

Proposed patch attached.