1 /*
2 * Copyright (c) 2016-2021 The strace developers.
3 * All rights reserved.
4 *
5 * SPDX-License-Identifier: LGPL-2.1-or-later
6 */
7
8 #define arch_set_scno s390_set_scno
9 #define ARCH_REGSET s390_regset
10 #include "../s390/set_scno.c"
11 #undef ARCH_REGSET
12 #undef arch_set_scno
13
14 #define arch_set_scno s390x_set_scno
15 #define ARCH_REGSET s390x_regset
16 #include "../s390/set_scno.c"
17 #undef ARCH_REGSET
18 #undef arch_set_scno
19
20 static int
21 arch_set_scno(struct tcb *tcp, kernel_ulong_t scno)
22 {
23 if (tcp->currpers == 1)
24 return s390_set_scno(tcp, scno);
25 else
26 return s390x_set_scno(tcp, scno);
27 }