]> git.ipfire.org Git - thirdparty/glibc.git/blame - sysdeps/s390/s390-32/memset.S
Replace FSF snail mail address with URLs.
[thirdparty/glibc.git] / sysdeps / s390 / s390-32 / memset.S
CommitLineData
847b055c 1/* Set a block of memory to some byte value. For IBM S390
85dd1003 2 Copyright (C) 2000, 2001, 2003 Free Software Foundation, Inc.
41bdb6e2 3 This file is part of the GNU C Library.
847b055c
AJ
4 Contributed by Martin Schwidefsky (schwidefsky@de.ibm.com).
5
6 The GNU C Library is free software; you can redistribute it and/or
41bdb6e2
AJ
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
847b055c
AJ
10
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
41bdb6e2 14 Lesser General Public License for more details.
847b055c 15
41bdb6e2 16 You should have received a copy of the GNU Lesser General Public
59ba27a6
PE
17 License along with the GNU C Library; if not, see
18 <http://www.gnu.org/licenses/>. */
847b055c
AJ
19
20/*
21 * R2 = address to memory area
22 * R3 = byte to fill memory with
23 * R4 = number of bytes to fill
24 */
25
26#include "sysdep.h"
27#include "asm-syntax.h"
28
29 .text
30ENTRY(memset)
31 ltr %r4,%r4
32 jz .L1
33 lr %r0,%r2 # save source address
34 lr %r1,%r3 # move pad byte to R1
35 lr %r3,%r4
36 sr %r4,%r4 # no source for MVCLE, only a pad byte
37 sr %r5,%r5
38.L0: mvcle %r2,%r4,0(%r1) # thats it, MVCLE is your friend
39 jo .L0
40 lr %r2,%r0 # return value is source address
41.L1:
42 br %r14
43END(memset)
85dd1003 44libc_hidden_builtin_def (memset)