@@ -66,10 +66,16 @@
 			vfs::zip::Unmount $mntfd $file
 		} else {
 			exec unzip -d $dir -n -qq $file
 		}
 	}
+
+	proc __isCompatibleCPU {teapot local} {
+	}
+
+	proc __isCompatibleOS {teapot local} {
+	}
 
 	set pkgcachedir [file join [__get_homedir] ".teapot-client" "cachedir"]
 
         # Conversions from Teapot-style names to local ones
 	set osTeapotToLocal(tcl) [list *]
@@ -79,10 +85,11 @@
 	set osTeapotToLocal(freebsd) [list freebsd_*]
 	set osTeapotToLocal(irix) [list irix_*]
 
 	set cpuTeapotToLocal(ix86) [list x86 intel i?86 i86pc]
 	set cpuTeapotToLocal(sparc) [list sun4*]
+	set cpuTeapotToLocal(sparc64) [list sun4u sun4v]
 	set cpuTeapotToLocal(universal) [list *]
 	set cpuTeapotToLocal(powerpc) [list ppc]
 
 	proc download_extensions {rootdir servers extensions os cpu {existingExts ""}} {
 		foreach chkdefext [list Tcl Tk msgcat] {