some changes to my mbclm.lisp