5 lines
90 B
Tcl
5 lines
90 B
Tcl
proc oid {oid name types} {
|
|
puts "$oid $name GOST $name $oid"
|
|
}
|
|
|
|
source [lindex $argv 0]
|