[net.micro.apple] Apple Pascal question

mush@dsd.UUCP (Dave Decker) (08/11/84)

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.