Well M-expressions to be more precise. Actually if you ask some they'll tell you that Mathematica is the only Lisp that implemented them.
Example:
applysymmetry(exp,opdum,symtype):=block(
[getdum:get(opdum,symtype),piece,inflag:true,partswitch:true],
if getdum=false then return(exp),
subst(lambda([[arglist]],
apply('aplsym1,append(getdum,[arglist,opdum]))),
opdum,exp))$
If you know Lisp, you will recognize typical constructs like IF, RETURN, SUBST, LAMBDA, APPLY, APPEND, ...I've always thought Mathematica would have been a better system build on top of a "real" lisp, and would have got there faster. I've never heard any of Wolframs statements about the parallels that have made me question that, but I could be missing something.
M-expressions is what I meant, I think I misremembered the name.