Search
21:20:32
stassats`
that list-length function does actually derive to (INTEGER 1 4611686018427387903) with (DEBUG 1)
21:21:23
stassats`
but the original form was compiled with debug 1, so i need to bring it back
21:22:40
stassats`
(do ((type types (cdr type)) (n 1 (1+ n))) ((null type) (incf n) n) (declare (fixnum n))) is enough to throw it off