Use shell /usr/bin/tclsh for Tcl scripts.
[yaz-moved-to-github.git] / src / csvtosru_update.tcl
1 #!/usr/bin/tclsh
2 #
3 # This file is part of the YAZ toolkit
4 # Copyright (c) Index Data 1996-2007
5 # See the file LICENSE for details.
6 #
7 # $Id: csvtosru_update.tcl,v 1.3 2008-01-06 13:02:48 adam Exp $
8 #
9 # Converts a CSV file with SRU update diagnostics to C+H file for easy
10 # maintenance
11 #
12 # $Id: csvtosru_update.tcl,v 1.3 2008-01-06 13:02:48 adam Exp $
13
14 source [lindex $argv 0]/csvtodiag.tcl
15
16 csvtodiag [list [lindex $argv 0]/sru_update.csv diagsru_update.c [lindex $argv 0]/../include/yaz/diagsru_update.h] sru_update {}