Fix cl-lib function.