blob: 32598ab7d1f42fa08506fa95214ccf79beacadd3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
int
do_reverse(arglast)
int *arglast;
{
STR **st = stack->ary_array;
register STR **up = &st[arglast[1]];
register STR **down = &st[arglast[2]];
register int i = arglast[2] - arglast[1];
while (i-- > 0) {
*up++ = *down;
if (i-- > 0)
*down-- = *up;
}
i = arglast[2] - arglast[1];
Move(down+1,up,i/2,STR*);
return arglast[2] - 1;
}
|