Browse Source

* fixed deref/resolve of sl_vec symlistitems

git-svn-id: trunk@2612 -
Jonas Maebe 19 years ago
parent
commit
84bd9d80f5
1 changed files with 4 additions and 2 deletions
  1. 4 2
      compiler/symtype.pas

+ 4 - 2
compiler/symtype.pas

@@ -744,10 +744,11 @@ implementation
              sl_load,
              sl_load,
              sl_subscript :
              sl_subscript :
                hp^.sym:=tsym(hp^.symderef.resolve);
                hp^.sym:=tsym(hp^.symderef.resolve);
-             sl_vec,
              sl_absolutetype,
              sl_absolutetype,
              sl_typeconv :
              sl_typeconv :
                hp^.tt.resolve;
                hp^.tt.resolve;
+             sl_vec:
+               hp^.valuett.resolve;
              else
              else
               internalerror(200110205);
               internalerror(200110205);
            end;
            end;
@@ -769,10 +770,11 @@ implementation
              sl_load,
              sl_load,
              sl_subscript :
              sl_subscript :
                hp^.symderef.build(hp^.sym);
                hp^.symderef.build(hp^.sym);
-             sl_vec,
              sl_absolutetype,
              sl_absolutetype,
              sl_typeconv :
              sl_typeconv :
                hp^.tt.buildderef;
                hp^.tt.buildderef;
+             sl_vec:
+               hp^.valuett.buildderef;
              else
              else
               internalerror(200110205);
               internalerror(200110205);
            end;
            end;