# the next line restats using tclsh \
exec tclsh "$0" "$@"
#
-# $Id: charconv.tcl,v 1.9 2005-11-06 01:55:06 adam Exp $
+# $Id: charconv.tcl,v 1.10 2005-11-09 17:48:11 adam Exp $
proc usage {} {
puts {charconv.tcl: [-p prefix] [-s split] [-o ofile] file ... }
$totype to : 24;
};
struct yaz_iconv_trie_dir {
- short ptr : 15;
+ int ptr : 15;
unsigned combining : 1;
$totype to : 24;
};
* Copyright (C) 1995-2005, Index Data ApS
* See the file LICENSE for details.
*
- * $Id: srwutil.c,v 1.32 2005-11-08 15:08:03 adam Exp $
+ * $Id: srwutil.c,v 1.33 2005-11-09 17:48:11 adam Exp $
*/
/**
* \file srwutil.c
219, 1, /* bad map */
220, 1, /* bad map */
221, 1, /* bad map */
- 222, 1, /* bad map */
+ 222, 3,
223, 1, /* bad map */
224, 1, /* bad map */
225, 1, /* bad map */