diff options
| author | J08nY | 2017-10-15 01:48:24 +0200 |
|---|---|---|
| committer | J08nY | 2017-10-15 01:48:24 +0200 |
| commit | 533542ee2b29f5f1ad490ffe00673a9ec50d375b (patch) | |
| tree | 0ba29a8e7e0427266d8002015656f637699c193c /src/gen | |
| parent | a6289893431c59bec9eec2493a955d8e05018dfc (diff) | |
| download | ecgen-533542ee2b29f5f1ad490ffe00673a9ec50d375b.tar.gz ecgen-533542ee2b29f5f1ad490ffe00673a9ec50d375b.tar.zst ecgen-533542ee2b29f5f1ad490ffe00673a9ec50d375b.zip | |
Add tests for field.c.
Diffstat (limited to 'src/gen')
| -rw-r--r-- | src/gen/field.c | 12 | ||||
| -rw-r--r-- | src/gen/field.h | 5 |
2 files changed, 14 insertions, 3 deletions
diff --git a/src/gen/field.c b/src/gen/field.c index 020927c..cc95bda 100644 --- a/src/gen/field.c +++ b/src/gen/field.c @@ -52,17 +52,17 @@ GENERATOR(field_gen_input) { } GEN e1 = input_short("e1:"); - if (equalii(e1, gen_m1)) { + if (equalii(e1, gen_m1) || gcmp(e1, m) > 0) { avma = ltop; return 0; } GEN e2 = input_short("e2:"); - if (equalii(e2, gen_m1)) { + if (equalii(e2, gen_m1) || gcmp(e2, m) > 0) { avma = ltop; return 0; } GEN e3 = input_short("e3:"); - if (equalii(e3, gen_m1)) { + if (equalii(e3, gen_m1) || gcmp(e3, m) > 0) { avma = ltop; return 0; } @@ -173,3 +173,9 @@ GEN field_ielement(GEN field, GEN in) { return gen_m1; /* NOT REACHABLE */ } } + +void field_quit(void) { + if (field && isclone(field)) { + gunclone(field); + } +} diff --git a/src/gen/field.h b/src/gen/field.h index 50cef8e..19edd02 100644 --- a/src/gen/field.h +++ b/src/gen/field.h @@ -74,4 +74,9 @@ GEN field_elementi(GEN element); */ GEN field_ielement(GEN field, GEN in); +/** + * @brief + */ +void field_quit(void); + #endif // ECGEN_FIELD_H |