Added one type cast from char to unsigned char
[yaz-moved-to-github.git] / src / csvtobib1.tcl
index 017dbd7..d9adc78 100755 (executable)
@@ -6,13 +6,13 @@ exec tclsh "$0" "$@"
 # Copyright (c) Index Data 1996-2006
 # See the file LICENSE for details.
 #
-# $Id: csvtobib1.tcl,v 1.2 2006-05-23 13:43:40 adam Exp $
+# $Id: csvtobib1.tcl,v 1.3 2006-05-23 20:43:37 adam Exp $
 #
 # Converts a CSV file with Bib-1 diagnostics to C+H file for easy
 # maintenance
 #
-# $Id: csvtobib1.tcl,v 1.2 2006-05-23 13:43:40 adam Exp $
+# $Id: csvtobib1.tcl,v 1.3 2006-05-23 20:43:37 adam Exp $
 
 source [lindex $argv 0]/csvtodiag.tcl
 
-csvtodiag [list [lindex $argv 0]/bib1.csv diagbib1.c ../include/yaz/diagbib1.h] bib1 diagbib1_str
+csvtodiag [list [lindex $argv 0]/bib1.csv diagbib1.c [lindex $argv 0]/../include/yaz/diagbib1.h] bib1 diagbib1_str