Browse Source

* 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 years ago
parent
commit
bc6f078247
1 changed files with 4 additions and 0 deletions
  1. 4 0
      compiler/symcreat.pas

+ 4 - 0
compiler/symcreat.pas

@@ -938,6 +938,10 @@ implementation
       { only necessary for the JVM target currently }
       { only necessary for the JVM target currently }
       if not (target_info.system in systems_jvm) then
       if not (target_info.system in systems_jvm) then
         exit;
         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);
       replace_scanner('synthetic_impl',sstate);
       add_synthetic_method_implementations_for_st(st);
       add_synthetic_method_implementations_for_st(st);
       for i:=0 to st.deflist.count-1 do
       for i:=0 to st.deflist.count-1 do