Diff of /sml/trunk/src/compiler/TopLevel/main/version.sml

Parent Directory | Revision Log | Patch

	revision 834, Wed May 23 18:30:31 2001 UTC	revision 1532, Tue Jul 13 03:49:10 2004 UTC
#	Line 1	Line 1
1	(* COPYRIGHT (c) 1996 Bell Laboratories *)	(* COPYRIGHT (c) 1996 Bell Laboratories *)
2	(* version.sml *)	(* version.sml *)
3
4	structure Version : sig	structure CompilerVersion : sig
5
6	val version : {	val version : {
7	system : string,            (* the system title *)	system : string,            (* the system title *)
#	Line 15	Line 15
15
16	val version = {	val version = {
17	system = "Standard ML of New Jersey ",	system = "Standard ML of New Jersey ",
18	version_id = [110, 33],	version_id = [110, 46, 1],
19	date = "May 23, 2001"	date = "June 17, 2004"
20	}	}
21
22	fun f ([], l) = l	fun f ([], l) = l
#	Line 28	Line 28
28	f (#version_id version, [" [FLINT v1.5], ", #date version]))	f (#version_id version, [" [FLINT v1.5], ", #date version]))
29
30	end	end
31
32		structure Version = CompilerVersion

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.834   changed lines   Added in v.1532

---

root@smlnj-gforge.cs.uchicago.edu	ViewVC Help
Powered by ViewVC 1.0.0