TCL 语言初接触

puts "Execute Input.tcl."load TLTcl.dllputs "Loading TenLira TCL Library."TLTcl_HostInterface_Initputs "Initialzing host interface."if { [catch {set devHandle [TLTcl_FindPciDevice 0x15bf 0x8086]}] } {puts "Device: 0x15bf 0x8086 Not Found."} else {puts "Find Device: 0x15bf 0x8086."TLTcl_SetHostInterfaceAccessDevice  $devHandleif { [catch {set val [TLTcl_ReadDwordFromCIOConfigSpace "0 0 0 0 0 0 0" 0 "device" 0x421] }] } {puts "NVM security status: secured "} else {puts "NVM security status: not secured "} }

在使用TCL解释器时，遇到个问题，加载库文件的时候，只支持8.5版本，8.6反而不能正确加载，不明所以