mirror of
https://github.com/gbdk-2020/gbdk-2020.git
synced 2026-03-06 07:24:46 +01:00
36 lines
1.6 KiB
C
36 lines
1.6 KiB
C
/*-------------------------------------------------------------------------
|
|
_modslong.c - routine for modulus of 32 bit signed long
|
|
|
|
Copyright (C) 1999, Sandeep Dutta . sandeep.dutta@usa.net
|
|
|
|
This library is free software; you can redistribute it and/or modify it
|
|
under the terms of the GNU General Public License as published by the
|
|
Free Software Foundation; either version 2, or (at your option) any
|
|
later version.
|
|
|
|
This library is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this library; see the file COPYING. If not, write to the
|
|
Free Software Foundation, 51 Franklin Street, Fifth Floor, Boston,
|
|
MA 02110-1301, USA.
|
|
|
|
As a special exception, if you link this library with other files,
|
|
some of which are compiled with SDCC, to produce an executable,
|
|
this library does not by itself cause the resulting executable to
|
|
be covered by the GNU General Public License. This exception does
|
|
not however invalidate any other reasons why the executable file
|
|
might be covered by the GNU General Public License.
|
|
-------------------------------------------------------------------------*/
|
|
|
|
unsigned long _modulong (unsigned long a, unsigned long b);
|
|
|
|
long _modslong (long a, long b) {
|
|
long r;
|
|
r = _modulong((a < 0 ? -a : a), (b < 0 ? -b : b));
|
|
return ( (a < 0) ^ (b < 0)) ? -r : r;
|
|
}
|