aboutsummaryrefslogtreecommitdiffstats
path: root/sql/serenitas.c
diff options
context:
space:
mode:
Diffstat (limited to 'sql/serenitas.c')
-rw-r--r--sql/serenitas.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/sql/serenitas.c b/sql/serenitas.c
index 76f5b62f..a6969eb0 100644
--- a/sql/serenitas.c
+++ b/sql/serenitas.c
@@ -218,7 +218,6 @@ Datum upfront_from_level(PG_FUNCTION_ARGS) {
tmp = SPI_getbinval(tuple, tupdesc, 1, &isnull);
if (isnull) {
pfree(currency);
- pfree(index);
elog(ERROR, "no curve for that date");
} else {
buf = DatumGetByteaPP(tmp);
@@ -228,20 +227,17 @@ Datum upfront_from_level(PG_FUNCTION_ARGS) {
if (get_TCurve(raw_data, data_length, curve) == -1 ) {
free(curve);
pfree(currency);
- pfree(index);
elog(ERROR, "error during decompression");
}
}
} else {
pfree(currency);
- pfree(index);
elog(ERROR, "no curve for that date");
}
SPI_finish();
double recovery = 0.4;
double upfront;
upfront = calc(TDate_from_DateADT(trade_date), issue_date, TDate_from_DateADT(maturity), recovery, coupon / 10000.0, cal_from_currency(currency), curve, traded_level, true);
- /* pfree(index); */
pfree(currency);
free(curve);
PG_RETURN_FLOAT8(upfront);