X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=util%2Fyaz-asncomp;h=e155e5b2e44f2a5cc4ea987a31c903a4a83d0994;hb=8cd8912e4ff99fd53ff78a028f7d84418e494b0d;hp=fb454a69d633380bb7a3c4d0d1419486d0993be7;hpb=8356ea58313ee1f350226172cf99bfb0b7c5583c;p=yaz-moved-to-github.git diff --git a/util/yaz-asncomp b/util/yaz-asncomp index fb454a6..e155e5b 100755 --- a/util/yaz-asncomp +++ b/util/yaz-asncomp @@ -1,7 +1,7 @@ #!/usr/bin/tclsh # # yaz-comp: ASN.1 Compiler for YAZ -# (c) Index Data 1996-2007 +# (c) Index Data 1996-2011 # See the file LICENSE for details. # @@ -519,7 +519,7 @@ proc asnSequence {name tag implicit tagtype} { lappend l "\tif (!odr_sequence_begin (o, p, sizeof(**p), 0))" lappend l "\t\{" - lappend l "\t\tif(o->direction == ODR_DECODE)" + lappend l "\t\tif (o->direction == ODR_DECODE)" lappend l "\t\t\t*p = 0;" lappend l "\t\treturn 0;" lappend l "\t\}" @@ -732,7 +732,7 @@ proc asnOf {name tag implicit tagtype isset} { } lappend j "\}" lappend l "\t\treturn 1;" - lappend l "\tif(o->direction == ODR_DECODE)" + lappend l "\tif (o->direction == ODR_DECODE)" lappend l "\t\t*p = 0;" lappend l "\treturn odr_missing(o, opt, name);" return [list [join $l \n] [join $j \n]] @@ -847,7 +847,7 @@ proc asnChoice {name tag implicit tagtype} { } lappend l "\t\treturn 1;" - lappend l "\tif(o->direction == ODR_DECODE)" + lappend l "\tif (o->direction == ODR_DECODE)" lappend l "\t\t*p = 0;" lappend l "\treturn odr_missing(o, opt, name);" @@ -1092,6 +1092,11 @@ proc asnModules {} { puts $file(outc) "" puts $file(outc) " ${greeting} ${yc_version}" puts $file(outc) "*/" + + puts $file(outc) "\#if HAVE_CONFIG_H" + puts $file(outc) "\#include " + puts $file(outc) "\#endif" + puts $file(outc) {} puts $file(outh) "/** \\file $inf(h-file)"