Mike,
    As I mentioned before, the simple test case of...

      program test
      integer i
      end

shows the following change in its .s file when the "common i"
is added...

--- assign.s.nocommon   2006-08-19 10:45:59.000000000 -0400
+++ assign.s    2006-08-19 10:46:19.000000000 -0400
@@ -18,6 +18,11 @@
        .stabs  "void:t(0,1)",128,0,0,0
 Lscope1:
        .stabs  "",36,0,0,Lscope1-LFBB1
+.comm ___BLNK__,4
+       .stabs  
"__BLNK__:G(0,2)=s4i:(0,3)=r(0,3);-2147483648;2147483647;,0,32;;",32,0,3,0
+       .stabs  "int4:t(0,3)",128,0,0,0
+       .stabs  "__BLNK__:G(0,2)",32,0,3,0
+       .stabs  "i:G(0,3)",32,0,4,0
        .stabs  "",100,0,0,Letext0
 Letext0:
        .section __TEXT,__picsymbolstub1,symbol_stubs,pure_instructions,32

I just wanted to be clear that you believe only the line...

+       .stabs  "i:G(0,3)",32,0,4,0

in that .s file is incorrect and it would be sufficient just to have
that suppressed by the gfortran compiler. Or do you believe it should
be replaced by something else for "i" as a COMMON block?
                  Jack

Reply via email to