Avoid unnecessary pollution of object module name table. Cygwin shared

build workaround (DJGPP swallows it too). One probably should do same
as with ELF calling it COFF, but I'm very short in COFF platforms, so
I just go for easy ad-hoc solution. I'll take care of merge to 0.9.7
later.
This commit is contained in:
Andy Polyakov 2003-01-10 10:16:39 +00:00
parent f8ea5cb579
commit 989f48d8c1
2 changed files with 4 additions and 4 deletions

View File

@ -94,7 +94,7 @@ $tmp
#undef SIZE
#undef TYPE
#define SIZE(a,b)
#define TYPE(a,b)
#define TYPE(a,b) .def a; .scl 2; .type 32; .endef
#endif /* __CYGWIN || __DJGPP */
#endif

View File

@ -345,15 +345,15 @@ sub main'function_end
popl %ebx
popl %ebp
ret
.${func}_end:
.L_${func}_end:
EOF
push(@out,$tmp);
if ($main'cpp)
{ push(@out,"\tSIZE($func,.${func}_end-$func)\n"); }
{ push(@out,"\tSIZE($func,.L_${func}_end-$func)\n"); }
elsif ($main'gaswin)
{ $tmp=push(@out,"\t.align 4\n"); }
else { push(@out,"\t.size\t$func,.${func}_end-$func\n"); }
else { push(@out,"\t.size\t$func,.L_${func}_end-$func\n"); }
push(@out,".ident \"$func\"\n");
$stack=0;
%label=();