mirror of
https://github.com/justinethier/cyclone.git
synced 2025-05-19 05:39:17 +02:00
Issue #411 - Treat null/improper lists as consts
This commit is contained in:
parent
05fc6fb8ed
commit
05d65b15b0
1 changed files with 5 additions and 0 deletions
|
@ -997,6 +997,11 @@
|
|||
;(newline)
|
||||
(cond
|
||||
((const? exp) exp)
|
||||
;; Null and Improper lists are just consts, no need to expand
|
||||
((null? exp) exp)
|
||||
((and (pair? exp)
|
||||
(not (list? exp)))
|
||||
exp)
|
||||
((and (prim? exp) ;; Allow lambda vars to shadown primitives
|
||||
(not (assoc exp local-renamed)))
|
||||
exp)
|
||||
|
|
Loading…
Add table
Reference in a new issue