diff options
Diffstat (limited to 'do/sreverse')
| -rw-r--r-- | do/sreverse | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/do/sreverse b/do/sreverse deleted file mode 100644 index bbf88b723d..0000000000 --- a/do/sreverse +++ /dev/null @@ -1,25 +0,0 @@ -int -do_sreverse(TARG,arglast) -STR *TARG; -int *arglast; -{ - STR **st = stack->ary_array; - register char *up; - register char *down; - register int tmp; - - str_sset(TARG,st[arglast[2]]); - up = str_get(TARG); - if (TARG->str_cur > 1) { - down = TARG->str_ptr + TARG->str_cur - 1; - while (down > up) { - tmp = *up; - *up++ = *down; - *down-- = tmp; - } - } - STABSET(TARG); - st[arglast[0]+1] = TARG; - return arglast[0]+1; -} - |