Moved function FDEFINITION and adapted it to new environment protocol.
Moved function (SETF FDEFINITION) and adapted it to new environment protocol.