Fail storing instance of Class in oza

[Jorge]

If you execute the following code, an error ( Segmentation fault ) is produced in the last instruction when loading back the oza stored:

Class @B {
  Text name = "B";
  //Real a = 1;
  Text Print(Real void) { WriteLn( "Hola" ) }
};

Class @C {
  @B aB
};

Class @A
{
  @B aBinA;
  @C aCinA
};

@B instB;

@A instA =
  [[
    @B aBinA = instB;
    @C aCinA = [[ @B aB = instB ]]
  ]];

Real Ois.Store( [[ instA ]], "./test.oza" );

Set kk = Ois.Load( "./test.oza" );

if member 'Real a' is uncommented then the 'Segmentation fault' does not appear but another error is generated, like this:

<E>
ERROR: [1] OIS: 
Cannot load from OIS NameBlock aCinAdue to ascent Class a doesn't exist</E>
<E>
ERROR: [2] OIS: 
BOisLoader::ReadNextObject: NULL element of set </E>
<E>
ERROR: [3] OIS: 
BOisLoader::ReadNextObject: NULL element of set </E>

[Víctor de Buen Remiro]

(In [1623]) Fixes #777