RE: inconsistently imported?

From: Wijck, Bart van <"Wijck,>
Date: Fri, 14 Dec 2001 15:20:25 +0100

Woops! Good example of me focussing on the wrong thing.

Thanks, Bart



-----Original Message-----
From: Walter Daniel Gallegos [mailto:walter{([at]})nowhere.xy
Sent: Friday, December 14, 2001 1:59 PM
To: 'Wijck, Bart van'
Subject: RE: inconsistently imported?


G'day:

command error: object BarbB.ARR inconsistently imported from BarbA

means that you modify the B code file after compile A, unload both and
recomplie B and A in this order.

Saludos, Walter.

-----Mensaje original-----
De: Wijck, Bart van [SMTP:Bart_van_Wijck{([at]})nowhere.xy
Enviado el: Viernes 14 de Diciembre de 2001 09:43 a.m.
Para: 'blackbox{([at]})nowhere.xy
Asunto: inconsistently imported?

BB's

Why does the following not work?

I'm declaring a simple array type ARR in module B and make it available for
export.

MODULE BarbB;

TYPE
  STR* = ARRAY 6 OF CHAR;
  ARR* = ARRAY 2 OF RECORD
           s* : STR
          END;

END BarbB.


Next in module A I declare two arrays X and Y of this type, fill X, copy X
to Y (both are the same named type so direct assignment should work) and
then display.

MODULE BarbA;

IMPORT BarbB,StdLog;

(* -------------------------------------------- *)
PROCEDURE P*; (* <commander>BarbA.P *)
VAR
  X,Y : BarbB.ARR;
  n : INTEGER;
BEGIN
  X[0].s := "ABC";
  X[1].s := "XYZ";
        
  Y := X;
        
  FOR n := 0 TO 1 DO
    StdLog.String(Y[n].s); StdLog.Ln
  END;
        
END P;
(* -------------------------------------------- *)

END BarbA.

Both compile ok, but when I execute I get the message:

     command error: object BarbB.ARR inconsistently imported from BarbA

I do not get this, everything has been declared for export and that should
work. The message is strange in any case because surely it should be from
module B.

Help anyone?

> ____________________________________
> Bart van Wijck
> Senior Business Development Consultant
> Compuware BV
> Telefoon: 020 311 88 57
> Fax : 020 311 88 01
> Mobiel : 06 54 35 23 76
>
>
--------------------------------------------

To unsubscribe from this mailing list, send a message containing the word
"unsubscribe" to:
   blackbox-request{([at]})nowhere.xy

To get a list of valid e-mail commands and instructions on their usage, send
a message containing the word "help" to the above address.

Send any problem reports or questions related to this email list to the list
owner at
   owner-blackbox{([at]})nowhere.xy
--------------------------------------------

To unsubscribe from this mailing list, send a message containing the word "unsubscribe" to:
   blackbox-request{([at]})nowhere.xy

To get a list of valid e-mail commands and instructions on their usage, send a message containing the word "help" to the above address.

Send any problem reports or questions related to this email list to the list owner at
   owner-blackbox{([at]})nowhere.xy
Received on Fri Dec 14 2001 - 14:20:25 UTC