-#!/bin/sh
-# the next line restarts using tclsh \
-if [ -f /usr/local/bin/tclsh8.4 ]; then exec tclsh8.4 "$0" "$@"; echo exec tclsh "$0" "$@"; fi
+#!/usr/bin/tclsh
#
# yaz-comp: ASN.1 Compiler for YAZ
-# (c) Index Data 1996-2004
+# (c) Index Data 1996-2007
# See the file LICENSE for details.
#
-# $Id: yaz-asncomp,v 1.6 2006-05-22 15:52:40 mike Exp $
-#
set yc_version 0.4
}
proc asnBasicINTEGER {} {
- return {odr_integer {int}}
+ return {odr_integer {Odr_int}}
}
proc asnBasicENUMERATED {} {
- return {odr_enum {int}}
+ return {odr_enum {Odr_int}}
}
proc asnBasicNULL {} {
}
proc asnBasicBOOLEAN {} {
- return {odr_bool {bool_t}}
+ return {odr_bool {Odr_bool}}
}
proc asnBasicOCTET {} {