[unix-history] / usr / src / old / lisp / liszt / lversion.l

;; lversion.l
;;				-[Tue Nov 22 08:56:16 1983 by jkf]-
;;
;; this defines this symbols:
;;   this-liszt-version-built: ctime string which tells when this liszt
;;	was built.
;;   compiler-name: the banner printed out when liszt starts up

;; this file is not sccsed because it only contains version number
;; information.

(setq this-liszt-version-built (status ctime))

(setq compiler-name
   (concat "Liszt "
	   #.(cond ((status feature for-vax) "vax")
	   	   ((status feature for-tahoe) "CCI tahoe")
		   ((status feature for-68k) "68000")
		   (t "(unknown machine)"))
	   " version 8.39a"))
Commit	Line	Data
e265f7cc C	1	;; lversion.l
	2	;; -[Tue Nov 22 08:56:16 1983 by jkf]-
	3	;;
	4	;; this defines this symbols:
	5	;; this-liszt-version-built: ctime string which tells when this liszt
	6	;; was built.
	7	;; compiler-name: the banner printed out when liszt starts up
	8
	9	;; this file is not sccsed because it only contains version number
	10	;; information.
	11
	12	(setq this-liszt-version-built (status ctime))
	13
	14	(setq compiler-name
	15	(concat "Liszt "
	16	#.(cond ((status feature for-vax) "vax")
	17	((status feature for-tahoe) "CCI tahoe")
	18	((status feature for-68k) "68000")
	19	(t "(unknown machine)"))
	20	" version 8.39a"))