017dbd7ff3848c70a35112f8b00d9ffbad86e5cb
[yaz-moved-to-github.git] / src / csvtobib1.tcl
1 #!/bin/sh
2 # the next line restats using tclsh \
3 exec tclsh "$0" "$@"
4 #
5 # This file is part of the YAZ toolkit
6 # Copyright (c) Index Data 1996-2006
7 # See the file LICENSE for details.
8 #
9 # $Id: csvtobib1.tcl,v 1.2 2006-05-23 13:43:40 adam Exp $
10 #
11 # Converts a CSV file with Bib-1 diagnostics to C+H file for easy
12 # maintenance
13 #
14 # $Id: csvtobib1.tcl,v 1.2 2006-05-23 13:43:40 adam Exp $
15
16 source [lindex $argv 0]/csvtodiag.tcl
17
18 csvtodiag [list [lindex $argv 0]/bib1.csv diagbib1.c ../include/yaz/diagbib1.h] bib1 diagbib1_str