… | |
… | |
1538 | return tmp; |
1538 | return tmp; |
1539 | } |
1539 | } |
1540 | |
1540 | |
1541 | /* make_throw_ob() We construct the 'carrier' object in |
1541 | /* make_throw_ob() We construct the 'carrier' object in |
1542 | * which we will insert the object that is being thrown. |
1542 | * which we will insert the object that is being thrown. |
1543 | * This combination becomes the 'thrown object'. -b.t. |
1543 | * This combination becomes the 'thrown object'. -b.t. |
1544 | */ |
1544 | */ |
1545 | static object * |
1545 | static object * |
1546 | make_throw_ob (object *orig) |
1546 | make_throw_ob (object *orig) |
1547 | { |
1547 | { |
1548 | if (!orig) |
1548 | if (!orig) |
1549 | return NULL; |
1549 | return 0; |
1550 | |
1550 | |
1551 | if (QUERY_FLAG (orig, FLAG_APPLIED)) |
1551 | if (QUERY_FLAG (orig, FLAG_APPLIED)) |
1552 | { |
1552 | { |
1553 | LOG (llevError, "BUG: make_throw_ob(): ob is applied\n"); |
1553 | LOG (llevError, "BUG: make_throw_ob(): ob is applied\n"); |
1554 | /* insufficient workaround, but better than nothing */ |
1554 | /* insufficient workaround, but better than nothing */ |