COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	begin "foo"
C00003 ENDMK
C⊗;
begin "foo"
integer procedure foobar;return(0);
integer procedure foofoo;begin integer i;i←1;return(i);end;

procedure barbar;
begin "baz" list l;procedure bazbar;begin integer i;l←nil;bazbar;end;
begin "bar" list l;l←nil;
begin "yak" list l;l←nil;
end "yak";
end "bar";
end "baz";

end "foo";