X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=src%2Fcsvtodiag.tcl;h=6dcd1be4986c28dbda69a4351cd37cde15a4a71f;hp=0066a3f9e4e267738f323046f0c8424d9875ab02;hb=bc2c68cf9316d95c5b00444aaaa2f0a6127c1aa9;hpb=3b703e575c88bd31b38f5af81c29aeed757ff11b diff --git a/src/csvtodiag.tcl b/src/csvtodiag.tcl index 0066a3f..6dcd1be 100644 --- a/src/csvtodiag.tcl +++ b/src/csvtodiag.tcl @@ -1,8 +1,7 @@ # This file is part of the YAZ toolkit -# Copyright (c) Index Data 1996-2005 +# Copyright (C) Index Data # See the file LICENSE for details. # -# $Id: csvtodiag.tcl,v 1.2 2005-04-22 14:51:11 adam Exp $ # # Converts a CSV file with diagnostics to C+H file for easy # maintenance @@ -17,8 +16,14 @@ proc csvtodiag {ifiles name alias} { set cfile [open [lindex $ifiles 1] w] set hfile [open [lindex $ifiles 2] w] set lineno 0 - set preamble "/* Generated automatically by csvtodiag.tcl from [lindex $ifiles 0] */" + puts $cfile "/** \\file [lindex $ifiles 1]" + puts $hfile "/** \\file [lindex $ifiles 2]" + set preamble " \\brief Diagnostics: Generated by csvtodiag.tcl from [lindex $ifiles 0] */" puts $cfile $preamble + puts $cfile "\#ifdef HAVE_CONFIG_H" + puts $cfile "\#include " + puts $cfile "\#endif" + puts $cfile " #include \"diag-entry.h\" \#include \"[lindex $ifiles 2]\"