projects
/
u
/
mdw
/
catacomb
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
A variety of small tweaks and fixes. Make mpmont etc. return errors
[u/mdw/catacomb]
/
f-prime.c
diff --git
a/f-prime.c
b/f-prime.c
index
b1c4367
..
f2fd7eb
100644
(file)
--- a/
f-prime.c
+++ b/
f-prime.c
@@
-160,11
+160,12
@@
field *field_prime(mp *p)
{
fctx_prime *f;
{
fctx_prime *f;
- if (!MP_POSP(p) || !MP_ODDP(p))
- return (0);
f = CREATE(fctx_prime);
f->f.ops = &fops;
f = CREATE(fctx_prime);
f->f.ops = &fops;
- mpmont_create(&f->mm, p);
+ if (mpmont_create(&f->mm, p)) {
+ DESTROY(f);
+ return (0);
+ }
f->f.zero = MP_ZERO;
f->f.one = f->mm.r;
f->f.m = f->mm.m;
f->f.zero = MP_ZERO;
f->f.one = f->mm.r;
f->f.m = f->mm.m;