src/csvtosrw.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: csvtosrw.tcl,v 1.5 2008-01-06 13:02:48 adam Exp $
   8 #
   9 # Converts a CSV file with SRW diagnostics to C+H file for easy
  10 # maintenance
  11 #
  12 # $Id: csvtosrw.tcl,v 1.5 2008-01-06 13:02:48 adam Exp $
  13
  14 source [lindex $argv 0]/csvtodiag.tcl
  15
  16 csvtodiag [list [lindex $argv 0]/srw.csv diagsrw.c [lindex $argv 0]/../include/yaz/diagsrw.h] srw {}