X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=z39.50%2Fz.tcl;h=9342d6510dc16636d5b7a1ce4c068b6c44e60fca;hb=6d04fc7a64ab1dd82574935bb189e055fe2d5e72;hp=065d00022eea061dd1546c3cfeef3e67cc9ef976;hpb=161ec45b40a3ab08e08946c9654ab6fea4604760;p=yaz-moved-to-github.git 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} }