diff options
| author | Dmitry Belyavskiy <beldmit@gmail.com> | 2019-11-10 04:30:14 +0300 |
|---|---|---|
| committer | Dmitry Belyavskiy <beldmit@users.noreply.github.com> | 2020-01-12 00:20:37 +0300 |
| commit | 3b8ddfe2f303b8931842e52bdb5c07c97042f651 (patch) | |
| tree | bfebf3f9306a4064f35a2510100623d8577e1dfb /tcl_tests/mkoidf.tcl | |
| parent | e09d5a86fe1cb876b3c7cf5eb0d890f557b466d0 (diff) | |
| download | gost-engine-3b8ddfe2f303b8931842e52bdb5c07c97042f651.zip gost-engine-3b8ddfe2f303b8931842e52bdb5c07c97042f651.tar.gz gost-engine-3b8ddfe2f303b8931842e52bdb5c07c97042f651.tar.bz2 | |
tcl_tests: Add TCL tests files
All source files are converted from cp1251 to utf-8.
Diffstat (limited to 'tcl_tests/mkoidf.tcl')
| -rw-r--r-- | tcl_tests/mkoidf.tcl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tcl_tests/mkoidf.tcl b/tcl_tests/mkoidf.tcl new file mode 100644 index 0000000..c08e015 --- /dev/null +++ b/tcl_tests/mkoidf.tcl @@ -0,0 +1,5 @@ +proc oid {oid name types} { + puts "$oid $name GOST $name $oid" +} + +source [lindex $argv 0] |