diff options
Diffstat (limited to 'sql/serenitas.c')
| -rw-r--r-- | sql/serenitas.c | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/sql/serenitas.c b/sql/serenitas.c index 9b173588..5932ef34 100644 --- a/sql/serenitas.c +++ b/sql/serenitas.c @@ -198,8 +198,7 @@ Datum upfront_from_level(PG_FUNCTION_ARGS) { pfree(currency); elog(ERROR, "something wrong happened"); } - SPI_finish(); - SPI_connect(); + SPI_freetuptable(SPI_tuptable); int16 curve_type = 532; sql_query = "SELECT curve FROM rate_curves WHERE effective_date=$1 AND curve_type=$2"; argtypes[0] = DATEOID; @@ -242,8 +241,8 @@ Datum upfront_from_level(PG_FUNCTION_ARGS) { 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); + /* pfree(index); */ + /* pfree(currency); */ + /* free(curve); */ PG_RETURN_FLOAT8(upfront); } |