propagate inlining metadata to keyword sorter methods

JuliaLang · Jul 12, 2022 · 62a4a00 · 62a4a00
1 parent c72625f
commit 62a4a00
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 0 deletions.
diff --git a/src/ast.scm b/src/ast.scm
@@ -523,6 +523,10 @@
   (and (if one (length= e 3) (length> e 2))
        (eq? (car e) 'meta) (memq (cadr e) '(nospecialize specialize))))
 
+(define (inline-meta? e)
+  (and (length= e 2)
+       (eq? (car e) 'meta) (memq (cadr e) '(inline noinline))))
+
 (define (if-generated? e)
   (and (length= e 4) (eq? (car e) 'if) (equal? (cadr e) '(generated))))
 

diff --git a/src/julia-syntax.scm b/src/julia-syntax.scm
@@ -562,6 +562,7 @@
              ,(if (any kwarg? pargl) (gensy) UNUSED)
              (call (core kwftype) ,ftype)) ,kw ,@pargl ,@vararg)
           `(block
+            ,@(filter inline-meta? prologue)
             ,@(let ((lnns (filter linenum? prologue)))
                 (if (pair? lnns)
                     (list (car lnns))