Diff

Differences From Artifact [33c288d7a2]:

To Artifact [59c0702767]:


18
19
20
21
22
23
24




25
26
27
28
29
30
31

	proc versionEncoded {versionString} {
		set output 0

		if {$versionString eq "trunk"} {
			return [versionEncoded "255.255.255"]
		}





		if {$versionString eq "core-8-7a3"} {
			return [versionEncoded "8.6.253"]
		}

		foreach element [lrange [split $versionString .] 0 2] {
			if {![string is integer -strict $element]} {







>
>
>
>







18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35

	proc versionEncoded {versionString} {
		set output 0

		if {$versionString eq "trunk"} {
			return [versionEncoded "255.255.255"]
		}

		if {$versionString eq "core-8-7-a5-rc"} {
			return [versionEncoded "8.6.254"]
		}

		if {$versionString eq "core-8-7a3"} {
			return [versionEncoded "8.6.253"]
		}

		foreach element [lrange [split $versionString .] 0 2] {
			if {![string is integer -strict $element]} {
69
70
71
72
73
74
75

76
77
78
79
80
81
82
	set tcl_versions(8.6.10) 8.6.10
	set tcl_versions(8.6.11) 8.6.11
	set tcl_version_list [lsort -dictionary [array names tcl_versions]]
	set tcl_version_selected [lindex $tcl_version_list end]

	set tcl_versions(fossil_trunk) "Fossil Trunk Tip"
	set tcl_versions(fossil_core-8-7a3) "Tcl 8.7a3"

	set tcl_version_list [lsort -dictionary [array names tcl_versions]]

	# Platforms
	set platforms(android-arm) "Android/ARM"
	set platforms(freebsd-amd64) "FreeBSD/amd64"
	set platforms(hpux-hppa64) "HP-UX/PA-RISC 2.0"
	set platforms(aix-ppc) "AIX/POWER"







>







73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
	set tcl_versions(8.6.10) 8.6.10
	set tcl_versions(8.6.11) 8.6.11
	set tcl_version_list [lsort -dictionary [array names tcl_versions]]
	set tcl_version_selected [lindex $tcl_version_list end]

	set tcl_versions(fossil_trunk) "Fossil Trunk Tip"
	set tcl_versions(fossil_core-8-7a3) "Tcl 8.7a3"
	set tcl_versions(fossil_core-8-7-a5-rc) "Tcl 8.7a5"
	set tcl_version_list [lsort -dictionary [array names tcl_versions]]

	# Platforms
	set platforms(android-arm) "Android/ARM"
	set platforms(freebsd-amd64) "FreeBSD/amd64"
	set platforms(hpux-hppa64) "HP-UX/PA-RISC 2.0"
	set platforms(aix-ppc) "AIX/POWER"
526
527
528
529
530
531
532



533
534
535
536
537
538
539
			return(versionEncoded("255.255.255"));
		}

		if (versionString === "core-8-7a3") {
			return(versionEncoded("8.6.253"));
		}




		try {
			versionString.split(".").slice(0, 3).forEach(function(element) {
				element = parseInt(element);
				if (isNaN(element)) {
					throw new Error("Invalid version string");
				}








>
>
>







531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
			return(versionEncoded("255.255.255"));
		}

		if (versionString === "core-8-7a3") {
			return(versionEncoded("8.6.253"));
		}

		if (versionString === "core-8-7-a5-rc") {
			return(versionEncoded("8.6.254"));
		}
		try {
			versionString.split(".").slice(0, 3).forEach(function(element) {
				element = parseInt(element);
				if (isNaN(element)) {
					throw new Error("Invalid version string");
				}