| 1389 | // |
| 1390 | |
| 1391 | static void cmp_sdl_fudge( gpre_req* request, SLONG lower_bound) |
| 1392 | { |
| 1393 | |
| 1394 | switch (gpreGlob.sw_language) |
| 1395 | { |
| 1396 | case lang_c: |
| 1397 | case lang_cxx: |
| 1398 | case lang_internal: |
| 1399 | if (!lower_bound) |
| 1400 | break; |
| 1401 | request->add_byte(isc_sdl_add); |
| 1402 | cmp_sdl_number(request, lower_bound); |
| 1403 | break; |
| 1404 | |
| 1405 | case lang_fortran: |
| 1406 | if (lower_bound == 1) |
| 1407 | break; |
| 1408 | request->add_byte(isc_sdl_add); |
| 1409 | cmp_sdl_number(request, lower_bound - 1); |
| 1410 | break; |
| 1411 | } |
| 1412 | } |
| 1413 | |
| 1414 | //____________________________________________________________ |
| 1415 | // |
no test coverage detected