| … | |
… | |
| 1678 | /* |
1678 | /* |
| 1679 | * env->insert (op) |
1679 | * env->insert (op) |
| 1680 | * This function inserts the object op in the linked list |
1680 | * This function inserts the object op in the linked list |
| 1681 | * inside the object environment. |
1681 | * inside the object environment. |
| 1682 | * |
1682 | * |
| 1683 | * The function returns now pointer to inserted item, and return value can |
1683 | * The function returns now pointer to inserted item, and return value can |
| 1684 | * be != op, if items are merged. -Tero |
1684 | * be != op, if items are merged. -Tero |
| 1685 | */ |
1685 | */ |
| 1686 | object * |
1686 | object * |
| 1687 | object::insert (object *op) |
1687 | object::insert (object *op) |
| 1688 | { |
1688 | { |
