[M3devel] compiler problems on Snow Leopard

[Tony Hosking]

Rather than cluttering up CVS, why not put it in the bug-tracker?  That's what it is for!

Antony Hosking | Associate Professor | Computer Science | Purdue University
305 N. University Street | West Lafayette | IN 47907 | USA
Office +1 765 494 6001 | Mobile +1 765 427 5484




On Dec 27, 2010, at 5:17 AM, Jay K wrote:

> Can you put all your code in our CVS repository?
> 
> > "../I386_DARWIN/FSSchemeStubs.m3", line 434: 2 code generation errors
> 
> There is a way to get that to show more information..
> Or does it already?
> 
>  - Jay
> 
> > To: m3devel at elegosoft.com
> > Date: Mon, 27 Dec 2010 02:14:21 -0800
> > From: mika at async.caltech.edu
> > Subject: Re: [M3devel] compiler problems on Snow Leopard
> > 
> > I upgraded to the CVS head and now I get the following:
> > 
> > ...
> > "../I386_DARWIN/FSSchemeStubs.m3", line 872: warning: unreachable statement
> > "../I386_DARWIN/FSSchemeStubs.m3", line 903: warning: unreachable statement
> > "../I386_DARWIN/FSSchemeStubs.m3", line 434: 2 code generation errors
> > 1 error and 23 warnings encountered
> > new exporters -> recompiling FSSchemeStubs.i3
> > ...
> > 
> > The source code is:
> > 
> > TYPE FS_Iterator_Surrogate = FS.Iterator OBJECT (* line 434 *)
> > interp : Scheme.T;
> > next_slot : SchemeObject.T := NIL;
> > close_slot : SchemeObject.T := NIL;
> > nextWithStatus_slot : SchemeObject.T := NIL;
> > OVERRIDES
> > next := FS_Iterator_next_default;
> > close := FS_Iterator_close_default;
> > nextWithStatus := FS_Iterator_nextWithStatus_default;
> > END;
> > 
> > Mika
> > 
> > Mika Nystrom writes:
> > >Hi everyone,
> > >
> > >Well I was able to get past all my linking issues (mostly questions
> > >of dynamic vs. static linking and how to do it, which seems to change from
> > >version to version...)
> > >
> > >But now I did hit a real problem.
> > >
> > >"../I386_DARWIN/FSSchemeStubs.m3", line 934: ** INTERNAL CG ERROR *** unaligne
> > >d store type=6 s/o/a=32/0/32
> > >"../I386_DARWIN/FSSchemeStubs.m3", line 981: ** INTERNAL CG ERROR *** unaligne
> > >d load_indirect type=6 s/a=32/32
> > >
> > >Here is the code, but it's not likely to be of much help...
> > >
> > >PROCEDURE ToScheme_File_Status(READONLY x : File.Status) : SchemeObject.T RAIS
> > >ES { Scheme.E } =
> > > BEGIN
> > > VAR res : SchemePair.T:=NIL; BEGIN
> > > res := SchemeUtils.Cons(SchemeUtils.Cons(SchemeSymbol.FromText("type"),T
> > >oScheme_Atom_T(x.type)),res);
> > > res := SchemeUtils.Cons(SchemeUtils.Cons(SchemeSymbol.FromText("modifica
> > >tionTime"),SchemeModula3Types.ToScheme_LONGREAL(x.modificationTime)),res);
> > > res := SchemeUtils.Cons(SchemeUtils.Cons(SchemeSymbol.FromText("size"),T
> > >oScheme_VAL0LONGINT__VAL16778080LONGINT(x.size)),res); (* line 934 *)
> > > RETURN res
> > > END
> > > END ToScheme_File_Status;
> > >
> > >
> > >...
> > >
> > >PROCEDURE ToScheme_VAL0LONGINT__VAL16778080LONGINT(READONLY x : [ VAL(0, LONGI
> > >NT )..VAL(16778080, LONGINT ) ]) : SchemeObject.T RAISES { Scheme.E } =
> > > BEGIN
> > > RETURN ToScheme_LONGINT(x) (* line 981 *)
> > > END ToScheme_VAL0LONGINT__VAL16778080LONGINT;
> > >
> > >
> > >for reference, ToScheme_LONGINT is:
> > >
> > >PROCEDURE ToScheme_LONGINT(READONLY x : LONGINT ) : SchemeObject.T RAISES { S
> > >cheme.E } =
> > > BEGIN
> > > WITH ref = NEW(REF LONGINT) DO
> > > ref^ := x;
> > > RETURN SchemeModula3Types.ToScheme_LONGINT(ref)
> > > END
> > > END ToScheme_LONGINT;
> > >
> > > Mika

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://m3lists.elegosoft.com/pipermail/m3devel/attachments/20101227/6708cea9/attachment-0002.html>