|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T t
Length: 1999 (0x7cf) Types: TextFile Names: »test.c«
└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0 └─⟦35176feda⟧ »EurOpenD22/isode/isode-6.tar.Z« └─⟦de7628f85⟧ └─⟦this⟧ »isode-6.0/dsap/common/test.c«
/* test.c - */ #ifndef lint static char *rcsid = "$Header: /f/osi/dsap/common/RCS/test.c,v 7.0 89/11/23 21:44:38 mrose Rel $"; #endif /* * $Header: /f/osi/dsap/common/RCS/test.c,v 7.0 89/11/23 21:44:38 mrose Rel $ * * * $Log: test.c,v $ * Revision 7.0 89/11/23 21:44:38 mrose * Release 6.0 * */ /* * NOTICE * * Acquisition, use, and distribution of this module and related * materials are subject to the restrictions of a license agreement. * Consult the Preface in the User's Manual for the full terms of * this agreement. * */ #include "quipu/util.h" #include "quipu/entry.h" main () { char buffer [1024]; Attr_Sequence as; Attr_Sequence as2; extern PS opt; extern int parse_line; extern int parse_status; extern char * TidyString (); extern int oidformat; PE pe = NULLPE; isodetailor ("test",1); quipu_syntaxes (); load_oid_table ("../oidtable"); parse_line = 0; parse_error ("Attribute parser %s","test"); for (;;) { (void) fprintf (stderr,"-> "); if (fgets (buffer, sizeof buffer, stdin) == 0) exit (0); parse_status = 0; as = str2as (TidyString(buffer)); if (as == NULLATTR) { (void) fprintf (stderr,"NULL value\n"); continue; } if (parse_status != 0) { (void) fprintf (stderr,"parse error - non null as\n"); continue; } if (encode_IF_Attribute (&pe, 0, 0, NULLCP, as) == NOTOK) { fprintf (stderr,"encode problem\n"); continue; } pe2pl (opt,pe); if (decode_IF_Attribute (pe, 1, NULLIP, NULLVP, as) == NOTOK) { fprintf (stderr,"decode problem\n"); continue; } (void) as_decode (as); ps_print (opt,"EDBOUT:\n"); as_print (opt,as,EDBOUT); as2 = as_cpy (as); if (as_cmp (as2,as) != 0) fprintf (stderr,"*** Compare/Copy problem ***\n"); as_free (as); if (as2 == NULLATTR) (void) fprintf (stderr,"NULL value 2\n"); else { ps_print (opt,"READOUT:\n"); as_print (opt,as2,READOUT); } as_free (as2); pe = NULLPE; } }