* better throw an internalerror in TAoptBase.RegLoadedWithNewValue instead of trying to make a safe approximation

git-svn-id: trunk@33002 -

compiler/aoptbase.pas

@@ -293,8 +293,7 @@ unit aoptbase;
 
   function TAoptBase.RegLoadedWithNewValue(reg : tregister; hp : tai) : boolean;
     begin
-      { save approximation }
-      Result:=true;
+      internalerror(2016012401);
     end;