Does not assign the correct multidimensional array length for nested procedures

[Oleg-N-Cher]

GameHunter reports:

MODULE Ex;

VAR
  i: INTEGER;

PROCEDURE Example ( VAR b:ARRAY OF ARRAY OF CHAR );

  PROCEDURE Example1;
    BEGIN
      i := LEN( b, 1 );
    END Example1;

END Example;

END Ex.

static void Ex_Example (CHAR *b, LONGINT b__len, LONGINT b__len1)
{
   struct Example__1 _s;
   _s.b = (void*)b; _s.b__len = b__len; _s.b__len = b__len;

      <-- required _s.b__len = b__len; _s.b__len1 = b__len1;