andrius
/
mes
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

wip

This commit is contained in:
Jan (janneke) Nieuwenhuizen 2022-09-12 08:04:55 +02:00
parent d47f02aee2
commit 298420cffe
1 changed files with 2 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/math.c
View File

@ -253,13 +253,10 @@ modulo_024 (struct scm *a, struct scm *b)
assert_number ("modulo", b);
long n = a->value;
long v = b->value;
int sign_p = 0;
long w = v;
//long u;
if (v == 0)
error (cstring_to_symbol ("divide-by-zero"), a);
// int sign_p = 0;
// size_t w = v;
int sign_p = 0;
size_t w = v;
// if (v < 0)
// {
// sign_p = 1;