Mercurial > pub > Impl
comparison Lib/IMPL/Object/List.pm @ 13:bb8d67f811ea
merge heads
| author | Sergey |
|---|---|
| date | Wed, 02 Sep 2009 23:11:14 +0400 |
| parents | 75980091813b |
| children | 818c74b038ae |
comparison
equal
deleted
inserted
replaced
| 12:955b2324c1bf | 13:bb8d67f811ea |
|---|---|
| 39 } | 39 } |
| 40 | 40 |
| 41 sub InsertAt { | 41 sub InsertAt { |
| 42 my ($this,$index,@val) = @_; | 42 my ($this,$index,@val) = @_; |
| 43 | 43 |
| 44 splice @$this,$index,0,@val; | 44 splice @$this,($index||0),0,@val; |
| 45 } | 45 } |
| 46 | 46 |
| 47 sub RemoveAt { | 47 sub RemoveAt { |
| 48 my ($this,$index,$count) = @_; | 48 my ($this,$index,$count) = @_; |
| 49 | 49 |
