Path: utzoo!yunexus!geac!syntron!jtsv16!uunet!husc6!bloom-beacon!tut.cis.ohio-state.edu!osu-cis!att!alberta!calgary!!gaines
From: gaines@.ucalgary.ca (Brian Gaines)
Newsgroups: comp.sys.mac.programmer
Subject: MPW Pascal Bug
Keywords: MPW Pascal Bug
Message-ID: <52@cs-spool.calgary.UUCP>
Date: 11 Oct 88 14:40:08 GMT
Article-I.D.: cs-spool.52
Sender: news@calgary.UUCP
Lines: 53


Under MPW and MPW Pascal 2.0.2 I have been getting a peculiar compiler error
which looks like an interaction between packed byte arrays and register usage.
The code below is a reduced skeleton that shows the error.

Anyone else met this?  Any later update to Pascal without the problem?

Brian Gaines, gaines@calgary.cdn, (403) 239-7696

Compilation and code follows:-

-------
Compilation follows
-------

   Pascal FocLibx.p -o FocLibx.p.o

### Code Generator Fatal Error
### Register 0..3
### Within DELEGRID (Error 2001): Expression too complicated, code generator ran out of registers ###
### IC = 64, IN = 0:200

-------
Program follows
-------

Unit x;

Interface

Implementation

Type

  bt  = 0..255;

  ba  = Packed Array[1..10,1..10] Of bt;
  
  gp       = ^gr;
  gr       = Record
      gr:  Packed Array[1..2] of ba;
    end;
	
Procedure DelEgrid(g: gp);
Var
  i,j          : Integer;
Begin
  With g^ Do Begin
    For i:=1 To 10 Do gr[1,i,j]:=gr[1,i,j];
  End;
End;

End.