Annotation of 43BSDReno/contrib/isode-beta/doc/manual/grind4-7.py, revision 1.1.1.1

1.1       root        1: ...
                      2: 
                      3: BEGIN
                      4: 
                      5: PersonnelRecord
                      6:        %{ char *Title; %}
                      7:        ::=
                      8:        [APPLICATION 0]
                      9:            IMPLICIT SET {
                     10:                    Name
                     11:                    %{
                     12:                        printf ("Name: %s %s. %s\n",
                     13:                                givenName, initial, familyName);
                     14:                    %},
                     15: 
                     16:                title[0]
                     17:                    IA5String
                     18:                    [[s Title]]
                     19:                    %{ printf ("Title: %s\n", Title); %},
                     20: 
                     21:                    EmployeeNumber,
                     22: 
                     23:                dateOfHire[1]
                     24:                    Date
                     25:                    %{ printf ("Date of Hire: %s\n", Date); %},
                     26: 
                     27:                nameOfSpouse[2]
                     28:                    Name
                     29:                    %{
                     30:                        printf ("Name of Spouse: %s %s. %s\n",
                     31:                                givenName, initial, familyName);
                     32:                    %},
                     33: 
                     34:                [3]
                     35:                    %{
                     36:                        PE      cc = prim2seq ($$);
                     37:                        if (cc)
                     38:                            printf ("Number of Children: %d\n",
                     39:                                    cc -> pe_cardinal);
                     40:                    %}
                     41:                    IMPLICIT SEQUENCE OF ChildInformation
                     42:                    DEFAULT {}
                     43:            }
                     44:            %{ printf ("--------\n"); %}
                     45: ...

unix.superglobalmegacorp.com

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