diff options
Diffstat (limited to 'Objects/listobject.c')
| -rw-r--r-- | Objects/listobject.c | 27 |
1 files changed, 26 insertions, 1 deletions
diff --git a/Objects/listobject.c b/Objects/listobject.c index 9a1fe23..b51e3d8 100644 --- a/Objects/listobject.c +++ b/Objects/listobject.c @@ -207,7 +207,7 @@ list_print(op, fp, flags) return 0; } -object * +static object * list_repr(v) listobject *v; { @@ -291,6 +291,18 @@ list_slice(a, ilow, ihigh) return (object *)np; } +object * +getlistslice(a, ilow, ihigh) + object *a; + int ilow, ihigh; +{ + if (!is_listobject(a)) { + err_badcall(); + return NULL; + } + return list_slice((listobject *)a, ilow, ihigh); +} + static object * list_concat(a, bb) listobject *a; @@ -422,6 +434,19 @@ list_ass_slice(a, ilow, ihigh, v) #undef b } +int +setlistslice(a, ilow, ihigh, v) + object *a; + int ilow, ihigh; + object *v; +{ + if (!is_listobject(a)) { + err_badcall(); + return NULL; + } + return list_ass_slice((listobject *)a, ilow, ihigh, v); +} + static int list_ass_item(a, i, v) listobject *a; |