summaryrefslogtreecommitdiff
path: root/src/lib/libcrypto/perlasm
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib/libcrypto/perlasm')
-rw-r--r--src/lib/libcrypto/perlasm/x86ms.pl9
-rw-r--r--src/lib/libcrypto/perlasm/x86unix.pl6
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
347sub main'data_word 354sub 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=();