Fixed copyright notice to be 2006-2007 instead of 2006.

This commit is contained in:
Abdulaziz Ghuloum 2007-01-11 19:22:32 -05:00
parent 09d9687fdd
commit 6359ca9ee4
3 changed files with 3 additions and 2 deletions

Binary file not shown.

View File

@ -93,7 +93,7 @@
(exit 0)]
[else
(printf "Ikarus Scheme (Build ~a)\n" (compile-time-date-string))
(display "Copyright (c) 2006 Abdulaziz Ghuloum\n\n")
(display "Copyright (c) 2006-2007 Abdulaziz Ghuloum\n\n")
(command-line-arguments args)
(for-each load files)
(new-cafe)

View File

@ -2812,7 +2812,8 @@
(id? (syntax mid))
; id receives old wrap so it won't be confused with id of same name
; defined within the module
(values (syntax orig) (wrap (syntax mid) w) (listify (syntax (ex ...))) (map (lambda (x) (wrap x *w)) (syntax (form ...)))))
(values (syntax orig) (wrap (syntax mid) w) (listify (syntax (ex ...)))
(map (lambda (x) (wrap x *w)) (syntax (form ...)))))
(_ (syntax-error (source-wrap e w ae))))))
(define parse-import