root/lib/libc/arch/m88k/gen/umodsi3.S
/*      $OpenBSD: umodsi3.S,v 1.3 2022/12/06 18:50:59 guenther Exp $    */

/*
 * Copyright (c) 2013 Miodrag Vallat.
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */


#include "SYS.h"

/*
 * uint __umodsi3(uint n, uint d);
 */

#ifndef LDSO
.weak   __umodsi3
#endif
ENTRY(__umodsi3)
        /* if divider is zero, trap */
        bcnd    ne0, %r3, 1f
        tb0     0, %r0, 503
1:

        divu    %r4, %r2, %r3
        mulu    %r5, %r4, %r3
        jmp.n   %r1
         subu   %r2, %r2, %r5
END(__umodsi3)