Return to test7.c CVS log

Up to [Research Unix] / researchv10no / cmd / cfront / libstring

Annotation of researchv10no/cmd/cfront/libstring/test7.c, revision 1.1.1.1

1.1       root        1: // list test program.  reverses standard input
                      2: 
                      3: #include "String.h"
                      4: #include "list.h"
                      5: 
                      6: listdeclare(String)
                      7: 
                      8: String_list
                      9: revrev ( String_list x )
                     10: {
                     11:        String_list     ans;
                     12:        while ( x ) {
                     13:                String  temp;
                     14:                x.getX(temp);
                     15:                String  rtemp;
                     16:                while ( temp ) {
                     17:                        char    c;
                     18:                        temp.getX(c);
                     19:                        rtemp.unget(c);
                     20:                }
                     21:                ans.unget(rtemp);
                     22:        }
                     23:        return ans;
                     24: }
                     25: 
                     26: String_list
                     27: rev ( String_list x )
                     28: {
                     29:        String_list     ans;
                     30:        while ( x ) {
                     31:                String  temp;
                     32:                x.getX(temp);
                     33:                ans.unget(temp);
                     34:        }
                     35:        return ans;
                     36: }
                     37: 
                     38: String_list
                     39: revrec ( String_list x )
                     40: {
                     41:        if ( x ) {
                     42:                String  temp;
                     43:                x.getX(temp);
                     44:                return revrec(x).put(temp);
                     45:        } else return x;
                     46: }
                     47: 
                     48: main()
                     49: {
                     50:        String_list     slist;
                     51:        String  temp;
                     52:        while ( cin >> temp)
                     53:                slist.put(temp);
                     54:        cout << "rev(slist):"  << rev(slist) << "\n";
                     55:        cout << "revrec(slist):" << revrec(slist) << "\n";
                     56:        cout << "revrev(slist):" << revrev(slist) << "\n";
                     57: }

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