1 // Copyright 2016 The Go Authors. All rights reserved.
2 // Use of this source code is governed by a BSD-style
3 // license that can be found in the LICENSE file.
4 5 //go:build !purego
6 7 #include "textflag.h"
8 9 // func blockS390X(dig *digest, p []byte)
10 TEXT ·blockS390X(SB), NOSPLIT|NOFRAME, $0-32
11 LMG dig+0(FP), R1, R3 // R2 = &p[0], R3 = len(p)
12 MOVBZ $1, R0 // SHA-1 function code
13 14 loop:
15 KIMD R0, R2 // compute intermediate message digest (KIMD)
16 BVS loop // continue if interrupted
17 RET
18