Skip to content
Snippets Groups Projects
Forked from cmucl / cmucl
Source project has a limited visibility.
  • gerd's avatar
    ce55ee05
    CLASS-04.[2345], CONDITION-27-READER-IS-GENERIC, compiled. Avoid · ce55ee05
    gerd authored
    	constant-folding tests for generic-functionness.  Fix intersection
    	of function types and generic-function.
    
    	* src/code/type.lisp (type-intersection2): Handle intersection
    	of FUNCTION-TYPEs with non-FUNCTION-TYPEs, like generic-function.
    
    	* src/compiler/typetran.lisp (ir1-transform-type-predicate)
    	(typep): Handle generic-function type tests differently.
    
    	* src/code/class.lisp (class) <:complex-subtypep-arg1>:
    	New type method for function = (function * *).
    ce55ee05
    History
    CLASS-04.[2345], CONDITION-27-READER-IS-GENERIC, compiled. Avoid
    gerd authored
    	constant-folding tests for generic-functionness.  Fix intersection
    	of function types and generic-function.
    
    	* src/code/type.lisp (type-intersection2): Handle intersection
    	of FUNCTION-TYPEs with non-FUNCTION-TYPEs, like generic-function.
    
    	* src/compiler/typetran.lisp (ir1-transform-type-predicate)
    	(typep): Handle generic-function type tests differently.
    
    	* src/code/class.lisp (class) <:complex-subtypep-arg1>:
    	New type method for function = (function * *).