Skip to content
Snippets Groups Projects
Forked from cmucl / cmucl
Source project has a limited visibility.
  • rtoy's avatar
    9eab32ea
    This causes an error: · 9eab32ea
    rtoy authored
    (macrolet ((%x () t))
        (declare (optimize))
        (declare (notinline identity)))
    
    Because the macrolet IR1 translator puts a list onto the FVARS
    arg in PROCESS-INLINE-DECLARATION, which is not a LEAF.
    
    This patch works around this by checking to see if the element of
    FVARS is a LEAF before getting the LEAF-NAME.
    
    There is probably a better solution.
    9eab32ea
    History
    This causes an error:
    rtoy authored
    (macrolet ((%x () t))
        (declare (optimize))
        (declare (notinline identity)))
    
    Because the macrolet IR1 translator puts a list onto the FVARS
    arg in PROCESS-INLINE-DECLARATION, which is not a LEAF.
    
    This patch works around this by checking to see if the element of
    FVARS is a LEAF before getting the LEAF-NAME.
    
    There is probably a better solution.