* explicitly reset successor if noreturn is set

git-svn-id: trunk@49487 -
(cherry picked from commit a988c0fab165f3146d13b8aae172680a079437ad)

compiler/optutils.pas

@@ -295,7 +295,9 @@ unit optutils;
               begin
                 { not sure if this is enough (FK) }
                 result:=p;
-                if not(cnf_call_never_returns in tcallnode(p).callnodeflags) then
+                if cnf_call_never_returns in tcallnode(p).callnodeflags then
+                  p.successor:=nil
+                else
                   p.successor:=succ;
               end;
             inlinen: