path: root/tcl_tests/mkoidf.tcl

proc oid {oid name types} {
	puts "$oid $name GOST $name $oid"
}

source [lindex $argv 0]