Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10 5/3/83; site dsd.UUCP
Path: utzoo!watmath!clyde!burl!ulysses!mhuxl!ihnp4!zehntel!hplabs!sdcrdcf!sdcsvax!akgua!mcnc!decvax!decwrl!amd!fortune!dsd!mush
From: mush@dsd.UUCP (Dave Decker)
Newsgroups: net.micro.apple,net.lang.pascal
Subject: Apple Pascal question
Message-ID: <323@dsd.UUCP>
Date: Fri, 10-Aug-84 19:43:23 EDT
Article-I.D.: dsd.323
Posted: Fri Aug 10 19:43:23 1984
Date-Received: Tue, 14-Aug-84 01:11:57 EDT
Organization: AMPEX DSD, Redwood City, CA.
Lines: 26

If it hasn't been done yet, could someone post the list of bugs fixed
by moving from Apple 1.1 to Apple 1.2?  Thanks in advanced.

Right now I'm wondering if this program would compile under 1.2 as
it will not under 1.1.

PROGRAM TEST;
TYPE REGISTER = PACKED RECORD
		  A	:0..7;
		  B	:0..3;
		  C	:0..1;
		  D	:0..3;
		END;

VAR
  Q	:REGISTER;
  I	:INTEGER;

BEGIN
  MOVELEFT(Q.A, I, 1);
END.

Changing the Q.A to simply Q will work on 1.1.

Dave Decker (mush) Ampex Corp Redwood City Ca.