diff options
Diffstat (limited to 'src/lib/libcrypto/perlasm')
-rw-r--r-- | src/lib/libcrypto/perlasm/x86ms.pl | 9 | ||||
-rw-r--r-- | src/lib/libcrypto/perlasm/x86unix.pl | 6 |
2 files changed, 11 insertions, 4 deletions
diff --git a/src/lib/libcrypto/perlasm/x86ms.pl b/src/lib/libcrypto/perlasm/x86ms.pl index 51dcce067f..252a57bdb5 100644 --- a/src/lib/libcrypto/perlasm/x86ms.pl +++ b/src/lib/libcrypto/perlasm/x86ms.pl | |||
@@ -341,7 +341,14 @@ sub main'set_label | |||
341 | $label{$_[0]}="${label}${_[0]}"; | 341 | $label{$_[0]}="${label}${_[0]}"; |
342 | $label++; | 342 | $label++; |
343 | } | 343 | } |
344 | push(@out,"$label{$_[0]}:\n"); | 344 | if((defined $_[1]) && ($_[1] == 1)) |
345 | { | ||
346 | push(@out,"$label{$_[0]}::\n"); | ||
347 | } | ||
348 | else | ||
349 | { | ||
350 | push(@out,"$label{$_[0]}:\n"); | ||
351 | } | ||
345 | } | 352 | } |
346 | 353 | ||
347 | sub main'data_word | 354 | sub main'data_word |
diff --git a/src/lib/libcrypto/perlasm/x86unix.pl b/src/lib/libcrypto/perlasm/x86unix.pl index 8c456b14af..60d75f5ce4 100644 --- a/src/lib/libcrypto/perlasm/x86unix.pl +++ b/src/lib/libcrypto/perlasm/x86unix.pl | |||
@@ -368,10 +368,10 @@ sub main'function_end_B | |||
368 | 368 | ||
369 | $func=$under.$func; | 369 | $func=$under.$func; |
370 | 370 | ||
371 | push(@out,".${func}_end:\n"); | 371 | push(@out,".L_${func}_end:\n"); |
372 | if ($main'cpp) | 372 | if ($main'cpp) |
373 | { push(@out,"\tSIZE($func,.${func}_end-$func)\n"); } | 373 | { push(@out,"\tSIZE($func,.L_${func}_end-$func)\n"); } |
374 | else { push(@out,"\t.size\t$func,.${func}_end-$func\n"); } | 374 | else { push(@out,"\t.size\t$func,.L_${func}_end-$func\n"); } |
375 | push(@out,".ident \"desasm.pl\"\n"); | 375 | push(@out,".ident \"desasm.pl\"\n"); |
376 | $stack=0; | 376 | $stack=0; |
377 | %label=(); | 377 | %label=(); |