2 * insert v into list u at pos w */
| 133 | * insert v into list u at pos w |
| 134 | */ |
| 135 | BOOLEAN lInsert3(leftv res, leftv u, leftv v, leftv w) |
| 136 | { |
| 137 | lists ul=(lists)u->CopyD(); |
| 138 | res->data=(char *)lInsert0(ul,v,(int)(long)w->Data()); |
| 139 | if (res->data==NULL) |
| 140 | { |
| 141 | Werror("cannot insert type `%s` at pos. %d", |
| 142 | Tok2Cmdname(v->Typ()),(int)(long)w->Data()); |
| 143 | return TRUE; |
| 144 | } |
| 145 | return FALSE; |
| 146 | } |
| 147 | |
| 148 | /*2 |
| 149 | * append v to list u |