Changeset 12130 in project for chicken


Ignore:
Timestamp:
10/09/08 09:48:55 (11 years ago)
Author:
felix winkelmann
Message:

added missing entry in chicken.import.scm for load-verbose; require-extension didn't generate import code for registered feature id [both reported by Peter Bex]

Location:
chicken/trunk
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • chicken/trunk/TODO

    r12122 r12130  
    4747   variable known (and allows inlining/contraction)
    4848** 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
    4950
    5051* tests
  • chicken/trunk/chicken.import.scm

    r11989 r12130  
    122122         load-relative
    123123         load-library
     124         load-verbose
    124125         machine-byte-order
    125126         machine-type
  • chicken/trunk/eval.scm

    r12101 r12130  
    12031203                       (memq id builtin-features/compiled)
    12041204                       (##sys#feature? id) ) )
    1205                (values '(##core#undefined) #t) )
     1205               (values (impform '(##core#undefined) id #t) #t) )
    12061206              ((memq id ##sys#core-library-modules)
    12071207               (values
  • chicken/trunk/expand.scm

    r12101 r12130  
    850850                (and-let* ((a (assq id (import-env)))
    851851                           ((not (eq? aid (cdr a)))))
    852                   (##sys#warn "re-importing already imported identfier: " id))))
     852                  (##sys#warn "re-importing already imported identfier" id))))
    853853            vsv)
    854854           (for-each
     
    856856              (and-let* ((a (assq (car imp) (macro-env)))
    857857                         ((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))) )
    859859            vss)
    860860           (import-env (append vsv (import-env)))
Note: See TracChangeset for help on using the changeset viewer.