Return to hello_world.py CVS log

Up to [CSRG BSD Unix] / 43BSDReno / contrib / isode-beta / pepy

Annotation of 43BSDReno/contrib/isode-beta/pepy/hello_world.py, revision 1.1.1.1

1.1       root        1: HelloWorldDefs DEFINITIONS ::=
                      2: 
                      3: %{
                      4: #include <stdio.h>
                      5: 
                      6: 
                      7: static char *text;
                      8: static char *myname = "hello_world";
                      9: 
                     10: 
                     11: void adios ();
                     12: 
                     13: /*  */
                     14: 
                     15: /* ARGSUSED */
                     16: 
                     17: main (argc, argv, envp)
                     18: int     argc;
                     19: char  **argv,
                     20:       **envp;
                     21: {
                     22:     PE     pe;
                     23: 
                     24:     myname = argv[0];
                     25: 
                     26:     if (build_HelloWorldDefs_MyStruct (&pe, 1, NULL, NULLCP, NULLCP) == NOTOK)
                     27:        adios (NULLCP, "encoder fails");
                     28:     if (unbuild_HelloWorldDefs_MyStruct (pe, 1, NULLIP, NULLVP, NULLCP)
                     29:            == NOTOK)
                     30:        adios (NULLCP, "decoder fails");
                     31: 
                     32:     exit (0);                  /* NOTREACHED */
                     33: }
                     34: %}
                     35: 
                     36: BEGIN
                     37: 
                     38: ENCODER        build
                     39: 
                     40: MyStruct ::=
                     41:        PrintableString [[s "Hello World" ]]
                     42: 
                     43: 
                     44: DECODER        unbuild
                     45: 
                     46: MyStruct ::=
                     47:        PrintableString [[s text]]
                     48:        %{ printf("%s\n", text); %}
                     49: 
                     50: END
                     51: 
                     52: %{
                     53: 
                     54: /*    ERRORS */
                     55: 
                     56: #include <varargs.h>
                     57: 
                     58: 
                     59: #ifndef        lint
                     60: void   _advise ();
                     61: 
                     62: 
                     63: static void  adios (va_alist)
                     64: va_dcl
                     65: {
                     66:     va_list ap;
                     67: 
                     68:     va_start (ap);
                     69: 
                     70:     _advise (ap);
                     71: 
                     72:     va_end (ap);
                     73: 
                     74:     _exit (1);
                     75: }
                     76: #else
                     77: /* VARARGS */
                     78: 
                     79: static void  adios (what, fmt)
                     80: char   *what,
                     81:        *fmt;
                     82: {
                     83:     adios (what, fmt);
                     84: }
                     85: #endif
                     86: 
                     87: 
                     88: #ifndef        lint
                     89: static void  advise (va_alist)
                     90: va_dcl
                     91: {
                     92:     va_list ap;
                     93: 
                     94:     va_start (ap);
                     95: 
                     96:     _advise (ap);
                     97: 
                     98:     va_end (ap);
                     99: }
                    100: 
                    101: 
                    102: static void  _advise (ap)
                    103: va_list        ap;
                    104: {
                    105:     char    buffer[BUFSIZ];
                    106: 
                    107:     asprintf (buffer, ap);
                    108: 
                    109:     (void) fflush (stdout);
                    110: 
                    111:     fprintf (stderr, "%s: ", myname);
                    112:     (void) fputs (buffer, stderr);
                    113:     (void) fputc ('\n', stderr);
                    114: 
                    115:     (void) fflush (stderr);
                    116: }
                    117: #else
                    118: /* VARARGS */
                    119: 
                    120: static void  advise (what, fmt)
                    121: char   *what,
                    122:        *fmt;
                    123: {
                    124:     advise (what, fmt);
                    125: }
                    126: #endif
                    127: 
                    128: %}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.