| 133 | } |
| 134 | |
| 135 | void Routine::checkReload(thread_db* tdbb) |
| 136 | { |
| 137 | if (!(flags & FLAG_RELOAD)) |
| 138 | return; |
| 139 | |
| 140 | if (!reload(tdbb)) |
| 141 | { |
| 142 | string err; |
| 143 | err.printf("Recompile of %s \"%s\" failed", |
| 144 | getObjectType() == obj_udf ? "FUNCTION" : "PROCEDURE", |
| 145 | getName().toString().c_str()); |
| 146 | |
| 147 | (Arg::Gds(isc_random) << Arg::Str(err)).raise(); |
| 148 | } |
| 149 | } |
| 150 | |
| 151 | // Parse routine BLR and debug info. |
| 152 | void Routine::parseBlr(thread_db* tdbb, CompilerScratch* csb, bid* blob_id, bid* blobDbg) |