Fixing hangs when loading init800.lisp
Returning eval_tagbody impl back