X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=z39.50%2Fz.tcl;h=9342d6510dc16636d5b7a1ce4c068b6c44e60fca;hp=065d00022eea061dd1546c3cfeef3e67cc9ef976;hb=d205d4870b1d64af05e9d6f6a2223086af4cce9e;hpb=35288d484fe640629398ac8e0c937ced92c75ae0 diff --git a/z39.50/z.tcl b/z39.50/z.tcl index 065d000..9342d65 100644 --- a/z39.50/z.tcl +++ b/z39.50/z.tcl @@ -1,5 +1,5 @@ # YC Sample Config File for Z39.50 -# $Id: z.tcl,v 1.1 1999-06-08 10:10:16 adam Exp $ +# $Id: z.tcl,v 1.2 1999-12-16 23:36:19 adam Exp $ # ---------------------------------------------------------- # Prefix Specifications # @@ -324,18 +324,6 @@ set filename($m) z-univ # ---------------------------------------------------------- # "Constructed" types defined by means of C-types are declared here. # Each function returns the C-handler and the C-type. -proc asnBasicGeneralString {} { - return {odr_generalstring char} -} - -proc asnBasicVisibleString {} { - return {odr_visiblestring char} -} - -proc asnBasicGeneralizedTime {} { - return {odr_generalizedtime char} -} - proc asnBasicEXTERNAL {} { return {z_External Z_External} }