$code.=<<___;
.text
-.type __KeccakF1600,\@function
+.type __KeccakF1600,\@abi-omnipotent
.align 32
__KeccakF1600:
mov $A[4][0](%rdi),@C[0]
.size __KeccakF1600,.-__KeccakF1600
.globl KeccakF1600
-.type KeccakF1600,\@function
+.type KeccakF1600,\@abi-omnipotent
.align 32
KeccakF1600:
.cfi_startproc
($A_flat,$inp) = ("%r8","%r9");
$code.=<<___;
.globl SHA3_absorb
-.type SHA3_absorb,\@function
+.type SHA3_absorb,\@function,4
.align 32
SHA3_absorb:
.cfi_startproc
$code.=<<___;
.globl SHA3_squeeze
-.type SHA3_squeeze,\@function
+.type SHA3_squeeze,\@function,4
.align 32
SHA3_squeeze:
.cfi_startproc