Return to const.mod CVS log

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

BSD 4.3

module main;
const
    PI = 3.14159;
    N = 10;
    MESSAGE = "this is a test";
    CH = 'x';
    S = {1, 3, 5};
    B = true;
type
    Color = (RED, BLUE, GREEN);
procedure p ();
const
    R = RED;
type
    T = integer;
var i : integer;
begin
end p;

begin
end main.

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