Skip to content
Snippets Groups Projects
Forked from cmucl / cmucl
Source project has a limited visibility.
  • rtoy's avatar
    c231fb42
    From Gerd, cmucl-imp, 2005/06/11: · c231fb42
    rtoy authored
        This week's fix is for something Lynn Quam reported 2004-10-18.
    
        (defclass a (b) ())
    
        (compile nil
    	     (lambda ()
    	       (defclass b ()
    		 ((x :reader b-x)))
    	       (defmethod f ((obj b))
    		 (b-x obj))))
          => error during macro expansion
    
        The fix is:
    
    	    * src/pcl/method-slot-access-optimization.lisp (check-inline-accessor-call-p):
    	    Return nil for forward-referenced classes.
    
    	    * src/pcl/info.lisp (decide-slot-type): Return nil for
    	    forward-referenced classes.
    c231fb42
    History
    From Gerd, cmucl-imp, 2005/06/11:
    rtoy authored
        This week's fix is for something Lynn Quam reported 2004-10-18.
    
        (defclass a (b) ())
    
        (compile nil
    	     (lambda ()
    	       (defclass b ()
    		 ((x :reader b-x)))
    	       (defmethod f ((obj b))
    		 (b-x obj))))
          => error during macro expansion
    
        The fix is:
    
    	    * src/pcl/method-slot-access-optimization.lisp (check-inline-accessor-call-p):
    	    Return nil for forward-referenced classes.
    
    	    * src/pcl/info.lisp (decide-slot-type): Return nil for
    	    forward-referenced classes.