Huang Ying's shell in common lisp