Fixes bug 163690: ikarus should display version number instead of

build date in the banner.

scheme/Makefile.am

@@ -4,9 +4,12 @@ EXTRA_DIST=ikarus.boot.orig ikarus.enumerations.ss ikarus.exceptions.ss ikarus.a
 
 all: $(nodist_pkglib_DATA)
 
-CLEANFILES=$(nodist_pkglib_DATA)
+ikarus.version.ss: Makefile
+	echo '(define ikarus-version "$(PACKAGE_VERSION)")' >$@
 
-ikarus.boot: $(EXTRA_DIST)
+CLEANFILES=$(nodist_pkglib_DATA) ikarus.version.ss
+
+ikarus.boot: $(EXTRA_DIST) ikarus.version.ss
 	../src/ikarus -b ./ikarus.boot.orig --r6rs-script makefile.ss
 
 # pkglibdir

scheme/Makefile.in

@@ -183,7 +183,7 @@ EXTRA_DIST = ikarus.boot.orig ikarus.enumerations.ss \
 	ikarus/code-objects.ss ikarus/compiler.ss \
 	ikarus/intel-assembler.ss ikarus/fasl/write.ss \
 	unicode/unicode-char-cases.ss unicode/unicode-charinfo.ss
-CLEANFILES = $(nodist_pkglib_DATA)
+CLEANFILES = $(nodist_pkglib_DATA) ikarus.version.ss
 all: all-am
 
 .SUFFIXES:
@@ -369,7 +369,10 @@ uninstall-am: uninstall-nodist_pkglibDATA
 
 all: $(nodist_pkglib_DATA)
 
-ikarus.boot: $(EXTRA_DIST)
+ikarus.version.ss: Makefile
+	echo '(define ikarus-version "$(PACKAGE_VERSION)")' >$@
+
+ikarus.boot: $(EXTRA_DIST) ikarus.version.ss
 	../src/ikarus -b ./ikarus.boot.orig --r6rs-script makefile.ss
 
 # pkglibdir

scheme/ikarus.main.ss

@@ -21,9 +21,12 @@
 (library (ikarus greeting)
   (export print-greeting)
   (import (ikarus))
-  (letrec-syntax ([compile-time-string (lambda (x) (date-string))])
+  (letrec-syntax ([compile-time-string 
+                    (lambda (x) 
+                      (include "ikarus.version.ss")
+                      ikarus-version)])
     (define (print-greeting)
-      (printf "Ikarus Scheme (Build ~a)\n" (compile-time-string))
+      (printf "Ikarus Scheme version ~a\n" (compile-time-string))
       (display "Copyright (c) 2006-2007 Abdulaziz Ghuloum\n\n"))))