Slice through a pointer

[zamtmn]

There is a great Slice function , but its use is clouded by the need to have Array type. Often Array this type is superfluous and is not used anywhere, only for slice calling. I think it would be great to add the ability to call through a pointer to a type. Or is there such a possibility and I don’t know it?

Code: Pascal  [Select][+][-]

1. program project1;
2. {$mode delphi}{$H+}
3. uses
4.   gvector;
5. type
6.   TTest2=TVector<integer>;
7.   TDummyArr=array[0..0]of integer;
8.   PTDummyArr=^TDummyArr;
9. procedure WriteArgs(const Args:array of integer);
10. var
11.   i:integer;
12. begin
13.   for i:=low(args) to high(args) do
14.     writeln(args[i]);
15. end;
16. var
17.   arr:TTest2;
18. begin
19.   arr:=TTest2.Create;
20.   arr.PushBack(1);
21.   arr.PushBack(2);
22.   arr.PushBack(3);
23.   arr.PushBack(4);
24.   WriteArgs(PTDummyArr(arr.Mutable[1])^[0..1]);//this work
25.   WriteArgs(slice(PTDummyArr(arr.Mutable[1])^,2));//this work
26.   WriteArgs(slice(PInteger(arr.Mutable[1]),2));//this better, bun not work((
27.   WriteArgs(slice(arr.Mutable[1]),2);//ideal))
28.   readln;
29. end.

[zamtmn]

No function will help here, it's the compiler magic

[zamtmn]

>>Oh really?
Yes.
Drinking coffee and thinking about how it works will be very good))

[zamtmn]

You're copying the data. It's an easy but slow way.
I never do superfluous work and I don't recommend this to you))

[zamtmn]

jamie

Code: Pascal  [Select][+][-]

1.  Function TVectorWithSlice<T>.Slice(aStart,ACount:Integer):TArray<T>;
2.   Begin
3.    SetLength(Result, ACount);
4.    Result := Copy(fData,aStart,ACount);
5.   end;

Try it on trunk fpc, you will not be pleasantly surprised((

[zamtmn]

Please note that there is no data copying in the source program, this is a mandatory requirement, because speed is very important
>>using 3.2.2
>>that should be close enough.
unfortunately not. There have been big changes - fData it private field, and cannot be used in heir

[zamtmn]

No, just passing an open array argument by PType and Count instead Array and Count

[zamtmn]

I don't understand what you're arguing about. your approach is good for a textbook, but in real life it will lead to huge memory and execution time overruns. Please have some more coffee and understand the difference between dynamic arrays and open arrays in function arguments

[jamie]

It appears u have other plans and they don't benifit the community

I withdrew as much of the bad code I could. So others don't get bothered

Have a good time.

[zamtmn]

jamie
You shouldn't be offended. I immediately said that I was not interested in copying. Copying is good when there are 4 elements in the array and you need to get 2 of them. But there may be megabytes in the array, and recursion in the algorithm

Erasing messages that have answers is bad))

[runewalsh]

Little-known feature, but always has been.

Code: Pascal  [Select][+][-]

1. procedure F(const x: array of int32);
2. begin
3. end;
4.  
5. var
6.         x: pInt32;
7.  
8. begin
9.         F(x[5 .. 10]);
10. end.

[zamtmn]

runewalsh
just

Code: Pascal  [Select][+][-]

1. WriteArgs(arr.Mutable[1][0..1]);

thanks!