mirror of
https://github.com/justinethier/cyclone.git
synced 2025-07-10 22:37:38 +02:00
More experimental changes
This commit is contained in:
parent
a6eafa7869
commit
965aadc0d6
1 changed files with 3 additions and 1 deletions
|
@ -752,7 +752,9 @@
|
|||
(let ((formals (ast:lambda-formals->list exp)))
|
||||
(for-each
|
||||
(lambda (e)
|
||||
(analyze:find-inlinable-vars e formals))
|
||||
;; TODO: experimental change, append args to formals instead
|
||||
;; of just passing formals along
|
||||
(analyze:find-inlinable-vars e (append formals args)))
|
||||
(ast:lambda-body exp))))
|
||||
((const? exp) #t)
|
||||
((quote? exp) #t)
|
||||
|
|
Loading…
Add table
Reference in a new issue