Преглед на файлове

* don't create the synthetic routines if any errors occurred, since that
will likely only cause more errors (or, in the worst case, internal
errors)

git-svn-id: trunk@22957 -

Jonas Maebe преди 12 години
родител
ревизия
bc6f078247
променени са 1 файла, в които са добавени 4 реда и са изтрити 0 реда
  1. 4 0
      compiler/symcreat.pas

+ 4 - 0
compiler/symcreat.pas

@@ -938,6 +938,10 @@ implementation
       { only necessary for the JVM target currently }
       if not (target_info.system in systems_jvm) then
         exit;
+      { skip if any errors have occurred, since then this can only cause more
+        errors }
+      if ErrorCount<>0 then
+        exit;
       replace_scanner('synthetic_impl',sstate);
       add_synthetic_method_implementations_for_st(st);
       for i:=0 to st.deflist.count-1 do