Explorar o código

Merged revisions 10081 via svnmerge from
http://svn.freepascal.org/svn/fpc/trunk

........
r10081 | peter | 2008-01-28 18:35:32 +0100 (Mon, 28 Jan 2008) | 2 lines

* typecheck after converting type to constant set
........

git-svn-id: branches/fixes_2_2@10082 -

peter %!s(int64=17) %!d(string=hai) anos
pai
achega
d87e37cf26
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  1. 1 0
      compiler/nset.pas

+ 1 - 0
compiler/nset.pas

@@ -231,6 +231,7 @@ implementation
              dispose(pst);
              right.free;
              right:=t;
+             typecheckpass(right);
            end;
 
          typecheckpass(left);