X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=util%2Fyaz-asncomp;h=721551e1b8a9998d93d2de2c8b0f2e9dcdc7485b;hb=070438f9027bec2411d0d3ec4491a6aa6651093a;hp=bbdeb0463415f3d77300be8e0301ec4dcc546cc6;hpb=33cb7ed48259fc7e22823531fc41a4a430aecc1b;p=yaz-moved-to-github.git

diff --git a/util/yaz-asncomp b/util/yaz-asncomp
index bbdeb04..721551e 100755
--- a/util/yaz-asncomp
+++ b/util/yaz-asncomp
@@ -4,8 +4,6 @@
 # (c) Index Data 1996-2007
 # See the file LICENSE for details.
 #
-# $Id: yaz-asncomp,v 1.9 2008-01-06 13:02:48 adam Exp $
-#
 
 set yc_version 0.4
 
@@ -521,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\}"
@@ -734,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]]
@@ -849,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);"
@@ -1219,11 +1217,11 @@ proc asnBasicEXTERNAL {} {
 }
 
 proc asnBasicINTEGER {} {
-    return {odr_integer {int}}
+    return {odr_integer {Odr_int}}
 }
 
 proc asnBasicENUMERATED {} {
-    return {odr_enum {int}}
+    return {odr_enum {Odr_int}}
 }
 
 proc asnBasicNULL {} {
@@ -1231,7 +1229,7 @@ proc asnBasicNULL {} {
 }
 
 proc asnBasicBOOLEAN {} {
-    return {odr_bool {bool_t}}
+    return {odr_bool {Odr_bool}}
 }
 
 proc asnBasicOCTET {} {