Commit | Line | Data |
---|---|---|
e583b16d C |
1 | (File step.l) |
2 | (clear-input-buffer lambda drain) | |
3 | (continue-evaluation lambda funcallhook evalhook eq cond) | |
4 | (evalhook* lambda quote funcall-evalhook*) | |
5 | (funcallhook* lexpr quote funcall-evalhook* cons |1-| + cdr <& do minusp eq cond sub1 listify arg let) | |
6 | (stephelpform lambda terpri terpr patom) | |
7 | (funcall-evalhook* lambda bigp zerop continue-evaluation clear-input-buffer stephelpform list symbolp dtpr read reset step *break break debug sstatus go tyi drain let terpr sub1 prog terpri evalhook quote princ null numberp or |1+| tyo print patom greaterp > cdr * do print* setq car memq eq atom not and cond) | |
8 | (step nlambda *rset sstatus quote eq setq car null or cond) |