[S390x] Alerting assembler of machine type

diff --git a/s390x/vf/memxor3.asm b/s390x/vf/memxor3.asm
index 467820058b9444992c12ffeca3152363b13f21f7..8797369f4f7526cfee54b7c7e95deb528987ce12 100644 (file)
--- a/s390x/vf/memxor3.asm
+++ b/s390x/vf/memxor3.asm
@@ -1,4 +1,4 @@
-C s390/memxor3.asm
+C s390/vx/memxor3.asm
 
 ifelse(`
    Copyright (C) 2020 Mamone Tarsha
@@ -30,6 +30,7 @@ ifelse(`
 ')
 
 .file "memxor3.asm"
+.machine "z13"
 
 .text
 

diff --git a/s390x/vf/sha3-permute.asm b/s390x/vf/sha3-permute.asm
index d656b97cb89395fba731c4e5df1d3bbeb1904d07..30514637f969d4911a0242997f01030d98616833 100644 (file)
--- a/s390x/vf/sha3-permute.asm
+++ b/s390x/vf/sha3-permute.asm
@@ -78,6 +78,7 @@ define(`T3', `%r13')
 define(`RC', `%r14')
 
 .file "sha3-permute.asm"
+.machine "z13"
 
 .text