Changeset 11978 in project


Ignore:
Timestamp:
09/22/08 11:44:02 (11 years ago)
Author:
felix
Message:

henrietta fixes

Location:
chicken/branches/hygienic
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • chicken/branches/hygienic/henrietta.scm

    r11961 r11978  
    5353
    5454  (define (test-file? path)
    55     (string-match "(\\./)?tests/.*" path))
     55    (string-match "(\\./)?tests(/.*)?" path))
    5656
    5757  (define (retrieve name version)
     
    7373          (for-each
    7474           (lambda (f)
    75              (unless (test-file? f)
     75             (when (or *tests* (not (test-file? f)))
    7676               (let ((ff (string-append dir "/" f))
    7777                     (pf (string-append prefix "/" f)))
     
    9696            (version #f))
    9797        (let loop ((qs (if m (cadr m) qs)))
    98           (let* ((m (string-search-positions "^(\\w+)=([^&]+)" qs))
     98          (let* ((m (string-search-positions "^&?(\\w+)=([^&]+)" qs))
    9999                 (ms (and m (apply substring qs (cadr m))))
    100100                 (rest (and m (substring qs (cadar m)))))
  • chicken/branches/hygienic/rules.make

    r11892 r11978  
    13691369        gzip -d -c $(SRCDIR)/bootstrap.tar.gz | tar xvf -
    13701370        touch *.c
    1371         $(MAKE) -f $(SRCDIR)/Makefile.$(PLATFORM) STATICBUILD=1 chicken$(EXE)
     1371        $(MAKE) -f $(SRCDIR)/Makefile.$(PLATFORM) STATICBUILD=1 DEBUGBUILD=1 \
     1372          chicken$(EXE)
    13721373        cp chicken$(EXE) chicken-boot$(EXE)
    13731374        touch *.scm
Note: See TracChangeset for help on using the changeset viewer.