mirror of
https://github.com/justinethier/cyclone.git
synced 2025-05-24 04:25:06 +02:00
Issue #462 - Properly handle top-level vectors
This commit is contained in:
parent
bf19dcd417
commit
02b892211c
2 changed files with 7 additions and 0 deletions
|
@ -1,5 +1,11 @@
|
||||||
# Changelog
|
# Changelog
|
||||||
|
|
||||||
|
## 0.31.0 - TBD
|
||||||
|
|
||||||
|
Bug Fixes
|
||||||
|
|
||||||
|
- Properly handle literal vectors at the top level of compiled code.
|
||||||
|
|
||||||
## 0.30.0 - July 2, 2021
|
## 0.30.0 - July 2, 2021
|
||||||
|
|
||||||
Features
|
Features
|
||||||
|
|
|
@ -597,6 +597,7 @@ if (acc) {
|
||||||
;; global may still be init'd to NULL if the order is incorrect in the "top level"
|
;; global may still be init'd to NULL if the order is incorrect in the "top level"
|
||||||
;; initialization code.
|
;; initialization code.
|
||||||
(symbol? (car (define->exp (car top-lvl)))) ;; TODO: put these at the end of top-lvl???
|
(symbol? (car (define->exp (car top-lvl)))) ;; TODO: put these at the end of top-lvl???
|
||||||
|
(vector? (car (define->exp (car top-lvl))))
|
||||||
(and (list? (car (define->exp (car top-lvl))))
|
(and (list? (car (define->exp (car top-lvl))))
|
||||||
(not (lambda? (car (define->exp (car top-lvl)))))))
|
(not (lambda? (car (define->exp (car top-lvl)))))))
|
||||||
(loop (cdr top-lvl)
|
(loop (cdr top-lvl)
|
||||||
|
|
Loading…
Add table
Reference in a new issue