mem-free bugfix; replaced (defstruct box ...) with hopefully faster (deftype box () 'cons)