COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	begin "pdtest"
C00003 ENDMK
C⊗;
begin "pdtest"

procedure foo;
	begin
	string array sa[1:10];
	sa[1]←null;
	end;

end;