X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=util%2Fyaz-asncomp;h=f858c772b0d682c631d73601aca7137d993d693d;hb=1429ec287c69a4a0b6a77b063af6796c529ff796;hp=e2a832dd20f12d264de082ca759be5abd771917c;hpb=51f5ff156a2550d96b6d27fd901edaab161b32c8;p=yaz-moved-to-github.git diff --git a/util/yaz-asncomp b/util/yaz-asncomp index e2a832d..f858c77 100755 --- a/util/yaz-asncomp +++ b/util/yaz-asncomp @@ -1,15 +1,15 @@ #!/bin/sh # the next line restarts using tclsh \ -exec tclsh "$0" "$@" +if [ -f /usr/local/bin/tclsh8.4 ]; then exec tclsh8.4 "$0" "$@"; else exec tclsh "$0" "$@"; fi # # yaz-comp: ASN.1 Compiler for YAZ # (c) Index Data 1996-2004 # See the file LICENSE for details. # -# $Id: yaz-asncomp,v 1.3 2004-02-11 21:39:45 adam Exp $ +# $Id: yaz-asncomp,v 1.7 2006-05-22 19:08:38 adam Exp $ # -set yc_version 0.3 +set yc_version 0.4 # Syntax for the ASN.1 supported: # file -> file module @@ -1089,20 +1089,29 @@ proc asnModules {} { set file(outp) [open $inf(h-path)/$inf(h-dir)$inf(p-file) w] } - set greeting {Generated automatically by the YAZ ASN.1 Compiler} + set greeting {Generated automatically by YAZ ASN.1 Compiler} - puts $file(outc) "/* ${greeting} ${yc_version} */" - puts $file(outc) "/* Module-C: $inf(module) */" + puts $file(outc) "/** \\file $inf(c-file)" + puts $file(outc) " \\brief ASN.1 Module $inf(module)" + puts $file(outc) "" + puts $file(outc) " ${greeting} ${yc_version}" + puts $file(outc) "*/" puts $file(outc) {} - puts $file(outh) "/* ${greeting} ${yc_version} */" - puts $file(outh) "/* Module-H $inf(module) */" + puts $file(outh) "/** \\file $inf(h-file)" + puts $file(outh) " \\brief ASN.1 Module $inf(module)" + puts $file(outh) "" + puts $file(outh) " ${greeting} ${yc_version}" + puts $file(outh) "*/" puts $file(outh) {} if {[info exists file(outp)]} { - puts $file(outp) "/* ${greeting} ${yc_version} */" - puts $file(outp) "/* Module-P: $inf(module) */" - puts $file(outp) {} + puts $file(outp) "/** \\file $inf(p-file)" + puts $file(outp) " \\brief ASN.1 Module $inf(module)" + puts $file(outp) "" + puts $file(outp) " ${greeting} ${yc_version}" + puts $file(outp) "*/" + puts $file(outp) {} } if {[info exists inf(p-file)]} { @@ -1390,8 +1399,8 @@ if {![info exists inf(iname)]} { puts "YAZ ASN.1 Compiler ${yc_version}" puts "Usage:" puts -nonewline ${argv0} - puts { [-v] [-c cfile] [-h hfile] [-p hfile] [-d dfile] [-I iout] [-i idir]} - puts { [-m module] file} + puts { [-v] [-c cfile] [-h hfile] [-p hfile] [-d dfile] [-I iout]} + puts { [-i idir] [-m module] file} exit 1 }