[Gm2] Bug or user error in gm2-2011-04-09 Solaris 10/sparc

[john o goyo]

Here is foreign.def:

DEFINITION MODULE FOR "C" foreign;

EXPORT UNQUALIFIED function;

PROCEDURE function(c :CHAR);

END foreign.


Here is interface.mod:

MODULE interface;

IMPORT foreign;

BEGIN
  foreign.function('!')
END interface.


Here is what gm2 does:


johng: 507 [tst-gm2]=> gm2 -c -fiso interface.mod
interface.mod: In function '_M2_interface_init':
interface.mod:5: error: invalid lvalue in unary '&'

Please advise.

john