* src/compiler/pack.lisp: repaired the broken pack