fixed problem with extern declarations

diff --git a/lang/cem/cemcom.ansi/idf.c b/lang/cem/cemcom.ansi/idf.c
index 00cebe1..080935a 100644 (file)
--- a/lang/cem/cemcom.ansi/idf.c
+++ b/lang/cem/cemcom.ansi/idf.c
@@ -317,7 +317,7 @@ declare_idf(ds, dc, lvl)
                        break;
                case L_FORMAL2: /* formal definition */
                default:        /* local */
-                       error("%s redeclared", idf->id_text);
+                       if (sc != EXTERN) error("%s redeclared", idf->id_text);
                        break;
                }
        }