package provide INTELPENTIUM 1.0
set dirname [file dirname [info script]]
lappend auto_path $dirname
#catch {load [file join $dirname intel-pentium@TCL_SHLIB_SUFFIX@]}