X-Git-Url: https://git.openssl.org/gitweb/?p=openssl.git;a=blobdiff_plain;f=crypto%2Fperlasm%2Fx86asm.pl;h=7a08dbfdc56c429cdb27c1bba6b36976584c10d1;hp=24f21e17ee70fa45fe649893816ccfa514166869;hb=d68ff71004282eedd8faa4411187fee08f54f75f;hpb=591e85e92813225cc4ed8840a636ea966f3053e8

diff --git a/crypto/perlasm/x86asm.pl b/crypto/perlasm/x86asm.pl
index 24f21e17ee..7a08dbfdc5 100644
--- a/crypto/perlasm/x86asm.pl
+++ b/crypto/perlasm/x86asm.pl
@@ -94,6 +94,8 @@ sub ::function_end_A
     $stack+=16;	# readjust esp as if we didn't pop anything
 }
 
+sub ::asciz {   foreach (@_) { &data_byte(unpack("C*",$_[0]),0); }   }
+
 sub ::asm_finish
 {   &file_end();
     print @out;