fix error handling

This commit is contained in:
Vítor Santos Costa
2015-09-25 10:57:26 +01:00
parent 4336b2ba88
commit b871f6676e
145 changed files with 4466 additions and 7508 deletions

View File

@@ -789,7 +789,7 @@ c_PG_row( USES_REGS1 ) {
#endif /* MYDDAS_STATS */
} else
{
Yap_Error(SYSTEM_ERROR, TermNil, "PG: %s", PG_errmsg( db ) );
Yap_Error(SYSTEM_ERROR_INTERNAL, TermNil, "PG: %s", PG_errmsg( db ) );
}
return rc;
}