Changeset 12130 in project
- Timestamp:
- 10/09/08 09:48:55 (12 years ago)
- Location:
- chicken/trunk
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
chicken/trunk/TODO
r12122 r12130 47 47 variable known (and allows inlining/contraction) 48 48 ** when inlining, consing arg-list with "list" may make get-keyword possible foldable 49 ** using plists instead of symbol lists (block-globals, etc.) might speed up things 49 50 50 51 * tests -
chicken/trunk/chicken.import.scm
r11989 r12130 122 122 load-relative 123 123 load-library 124 load-verbose 124 125 machine-byte-order 125 126 machine-type -
chicken/trunk/eval.scm
r12101 r12130 1203 1203 (memq id builtin-features/compiled) 1204 1204 (##sys#feature? id) ) ) 1205 (values '(##core#undefined) #t) )1205 (values (impform '(##core#undefined) id #t) #t) ) 1206 1206 ((memq id ##sys#core-library-modules) 1207 1207 (values -
chicken/trunk/expand.scm
r12101 r12130 850 850 (and-let* ((a (assq id (import-env))) 851 851 ((not (eq? aid (cdr a))))) 852 (##sys#warn "re-importing already imported identfier :" id))))852 (##sys#warn "re-importing already imported identfier" id)))) 853 853 vsv) 854 854 (for-each … … 856 856 (and-let* ((a (assq (car imp) (macro-env))) 857 857 ((not (eq? (cdr imp) (cdr a))))) 858 (##sys#warn "re-importing already imported syntax :" (car imp))) )858 (##sys#warn "re-importing already imported syntax" (car imp))) ) 859 859 vss) 860 860 (import-env (append vsv (import-env)))
Note: See TracChangeset
for help on using the changeset viewer.