Added a message to the effect that 'local commons' can not be handled.

diff --git a/util/led/extract.c b/util/led/extract.c
index d0b9b72..4ed5cec 100644 (file)
--- a/util/led/extract.c
+++ b/util/led/extract.c
@@ -139,8 +139,10 @@ namerelocate(name, sects)
 
        if ((type & S_TYP) == S_UND || (type & S_TYP) == S_ABS)
                return;
-       if (type & S_COM)
+       if (type & S_COM) {
+               if ( ! (type&S_EXT) ) fatal("local commons should be handled by the assembler") ;
                return;
+       }
 
        sectindex = (type & S_TYP) - S_MIN;
        if (name->on_valu >= sects[sectindex].os_flen) {