Skip to content
Snippets Groups Projects
Forked from cmucl / cmucl
Source project has a limited visibility.
  • gerd's avatar
    a1a66688
    Generalized function names. · a1a66688
    gerd authored
    	* code/fdefinition.lisp (*valid-function-names*): New variable.
    	(%define-function-name-syntax, valid-function-name-p): New
    	functions.
    	(define-function-name-syntax): New macro.
    	(toplevel): Define the syntax of setf function names.
    	(fdefinition-object): Use valid-function-name-p.
    
    	* compiler/proclaim.lisp (check-function-name): Use
    	valid-function-name-p.
    
    	* compiler/ir1tran.lisp (function): Use valid-function-name-p.
    
    	* code/profile.lisp (%report-times): Use valid-function-name-p.
    
    	* code/macros.lisp (defun): Use valid-function-name-p.
    
    	* code/eval.lisp (eval): Use valid-function-name-p.
    
    	* code/describe.lisp (describe-aux, describe-function-name):
    	Use valid-function-name-p.
    
    	* code/exports.lisp ("EXTENSIONS"): Add
    	define-function-name-syntax and valid-function-name-p.
    a1a66688
    History
    Generalized function names.
    gerd authored
    	* code/fdefinition.lisp (*valid-function-names*): New variable.
    	(%define-function-name-syntax, valid-function-name-p): New
    	functions.
    	(define-function-name-syntax): New macro.
    	(toplevel): Define the syntax of setf function names.
    	(fdefinition-object): Use valid-function-name-p.
    
    	* compiler/proclaim.lisp (check-function-name): Use
    	valid-function-name-p.
    
    	* compiler/ir1tran.lisp (function): Use valid-function-name-p.
    
    	* code/profile.lisp (%report-times): Use valid-function-name-p.
    
    	* code/macros.lisp (defun): Use valid-function-name-p.
    
    	* code/eval.lisp (eval): Use valid-function-name-p.
    
    	* code/describe.lisp (describe-aux, describe-function-name):
    	Use valid-function-name-p.
    
    	* code/exports.lisp ("EXTENSIONS"): Add
    	define-function-name-syntax and valid-function-name-p.