Added generic function (SETF FUNCTION-AST).
Added generic function (SETF FUNCTION-AST).

clasp-developers/SICL,clasp-developers/SICL,vtomole/SICL,vtomole/SICL,clasp-developers/SICL,vtomole/SICL,vtomole/SICL,clasp-developers/SICL