Path: utzoo!mnetor!uunet!husc6!uwvax!dogie!uwmcsd1!tut.cis.ohio-state.edu!bloom-beacon!mit-eddie!uw-beaver!tektronix!reed!douglas
From: douglas@reed.UUCP (P Douglas Reeder)
Newsgroups: comp.lang.pascal
Subject: Re: valid construction?
Message-ID: <8432@reed.UUCP>
Date: 9 Mar 88 06:06:40 GMT
References: <12171@brl-adm.ARPA>
Reply-To: douglas@reed.UUCP (P Douglas Reeder)
Organization: Reed College, Portland OR
Lines: 26

Richard Ward asked if his program construct was valid.
It looked fine to me, so I filled out his program as follows.
It compiled without trouble here in Berkley Pascal under UNIX on our VAX.
Richard, I think it's your compiler.

program ok;

const maxelts = 999;

type
    record1 = record
       stuff : integer;
       end;
    record2 = record
    	morestuff : integer;
    	array1 : array[0..maxelts] of record1;
    	yetmorestuff : real;
    	end;

begin
end.
-- 
Doug Reeder            USENET: ...!tektronix!reed!douglas
Box 502 Reed College   BITNET: douglas@reed.UUCP
3203 S.E. Woodstock      ARPA: !tektronix!reed!douglas@Berkley
Portland, OR 97202   UNIVERSE: Local Group,Milky Way,Sol III,122 38'W 45 28'N