Fix some assembler generating scripts for better unification
[openssl.git] / crypto / bn / asm / s390x-gf2m.pl
index 9d18d40e778467677d45549b83755d0b53d0a40b..1d76c9f416c3f0e6efbe63a09ffb87c36be559f2 100644 (file)
@@ -35,7 +35,7 @@ if ($flavour =~ /3[12]/) {
         $g="g";
 }
 
-while (($output=shift) && ($output!~/^\w[\w\-]*\.\w+$/)) {}
+while (($output=shift) && ($output!~/\w[\w\-]*\.\w+$/)) {}
 open STDOUT,">$output";
 
 $stdframe=16*$SIZE_T+4*8;