Re: Problem with import/export in local modules

[john o goyo]

Greetings, Gaius and Michael.

On 2024-03-28 08:21, Michael Riedl wrote:
> John,
>
> if you change the sequence of the EXPORT and IMPORT statement it 
> should work - not sure if there is is somewhere defined in PIM or ISO,
>
> but in my library I always have IMPORT before EXPORT as well.

Thank you both -- that was the problem.  I was compiling legacy code, 
moved some procedures from a local module to the parent, and erroneously 
put the IMPORT in the wrong place in the other local modules.

Sincerely,
john

> Gruß / Greetings
>
> Michael
>
> Am 28.03.24 um 01:05 schrieb john o goyo:
> > MODULE Test;
> >
> > PROCEDURE Double(n :CARDINAL) :CARDINAL;
> > BEGIN
> >     RETURN 2*n
> > END Double;
> >
> > MODULE Inside;
> >
> >     EXPORT Quadruple;
> >     IMPORT Double;
> >
> >     PROCEDURE Quadruple(k :CARDINAL) :CARDINAL;
> >     BEGIN
> >         RETURN Double(k) * Double(k)
> >     END Quadruple;
> >
> > END Inside;
> >
> > VAR
> >     d :CARDINAL;
> > BEGIN
> >     d := Quadruple(3)
> > END Test.