New function yaz_strerror.
[yaz-moved-to-github.git] / z39.50 / z.tcl
index 7100253..bd2d6d7 100644 (file)
@@ -1,5 +1,5 @@
 # YC Sample Config File for Z39.50
-# $Id: z.tcl,v 1.6 2002-02-11 23:25:27 adam Exp $
+# $Id: z.tcl,v 1.9 2002-12-05 12:07:00 adam Exp $
 # ----------------------------------------------------------
 # Prefix Specifications
 #  
@@ -205,7 +205,7 @@ set m RecordSyntax-SUTRS
 set filename($m) z-sutrs
 #set map($m,SutrsRecord) SUTRS
 set body($m,c) {
-int z_SUTRS (ODR o, Odr_oct **p, int opt)
+int z_SUTRS (ODR o, Odr_oct **p, int opt, const char *name)
 {
     return odr_implicit(o, odr_octetstring, p, ODR_UNIVERSAL,
         ODR_GENERALSTRING, opt);
@@ -214,7 +214,7 @@ int z_SUTRS (ODR o, Odr_oct **p, int opt)
 
 set init($m,h) {
 typedef Odr_oct Z_SUTRS;
-YAZ_EXPORT int z_SUTRS (ODR o, Odr_oct **p, int opt);
+YAZ_EXPORT int z_SUTRS (ODR o, Odr_oct **p, int opt, const char *name);
 }
 # ----
 set m RecordSyntax-opac
@@ -321,6 +321,9 @@ set map($m,Z3950DateSeason) DateSeason
 set map($m,Date_0) DateFlags
 set unionmap($m,DateFlags,era) {}
 # ----
+set m UserInfoFormat-multipleSearchTerms-2
+set filename($m) z-mterm2
+# ----
 set m ResourceReport-Format-Universe-1 
 set filename($m) z-univ
 # ----
@@ -334,7 +337,8 @@ set map($m,TargetPart) ESAdminTargetPart
 # ----
 set m NegotiationRecordDefinition-charSetandLanguageNegotiation-3
 set filename($m) z-charneg
-
+set membermap($m,OriginProposal_0,private) {OriginProposal_0_private zprivate}
+set membermap($m,TargetResponse,private) {TargetResponse_private zprivate}
 # ----------------------------------------------------------
 # "Constructed" types defined by means of C-types are declared here.
 # Each function returns the C-handler and the C-type.