| 268 | |
| 269 | |
| 270 | static SLONG get_long() |
| 271 | { |
| 272 | /************************************** |
| 273 | * |
| 274 | * g e t _ l o n g |
| 275 | * |
| 276 | ************************************** |
| 277 | * |
| 278 | * Functional description |
| 279 | * |
| 280 | **************************************/ |
| 281 | union { |
| 282 | SLONG l; |
| 283 | SSHORT i; |
| 284 | SCHAR c; |
| 285 | } value; |
| 286 | |
| 287 | SCHAR* p = (SCHAR *) & value.l; |
| 288 | SLONG i = getc(trace); |
| 289 | const SLONG x = i; |
| 290 | |
| 291 | while (--i >= 0) |
| 292 | *p++ = getc(trace); |
| 293 | |
| 294 | if (x == 1) |
| 295 | return value.c; |
| 296 | |
| 297 | if (x == 2) |
| 298 | return value.i; |
| 299 | |
| 300 | return value.l; |
| 301 | } |
| 302 | |
| 303 | |
| 304 | static void db_error( int status) |
no test coverage detected