Return to const.p CVS log

Up to [CSRG BSD Unix] / 43BSD / ucb / dbx / tests / pc

Annotation of 43BSD/ucb/dbx/tests/pc/const.p, revision 1.1.1.1

1.1       root        1: program consttest (input, output);
                      2: const
                      3:     PI = 3.14159;
                      4:     N = 10;
                      5:     MESSAGE = 'this is a test';
                      6:     CH = 'x';
                      7: type
                      8:     Color = (RED, BLUE, GREEN);
                      9: 
                     10: procedure p ;
                     11: const
                     12:     R = RED;
                     13: type
                     14:     T = integer;
                     15: var i : integer;
                     16: begin
                     17: end;
                     18: 
                     19: begin
                     20: end.

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