added maxframe, ccl-init.lisp