Beginning of top-level function COMPILE-FUNCTION-FORM.